Jump to content

Criação de uma pasta em qualquer computador


Lukas S.
 Share

Recommended Posts

Olá a todos .... Estou a criar um 9gag viewer em vb .net para poder ver imagens do 9gag no pc com a possibilidade de passar as imagens ... Usei o método regex para capturar as imagens mas eu gostaria de guardar numa pasta nos documentos .... mas o problema é que eu só tenho para o meu computador

    Function get_img()
        Dim Source = str
        s = ""
        For Each M As Match In Regex.Matches(Source, Pattern)
            s += (M.Groups(1).Value) & "|!|"
            s += (M.Groups(2).Value) & vbNewLine
        Next
        'RichTextBox1.Text = s
        strpost = Split(s, vbNewLine)
        'error
        strprev = Split(strpost(img_nmbr), "|!|")
        img_id = ReplaceStr(strprev(0), "http://d24w6bsrhbeh9d.cloudfront.net/photo/")
        If My.Computer.FileSystem.FileExists("C:\Users\Lucas Saraiva\Pictures\Gag_viewer" & img_id) Then
            PictureBox1.ImageLocation = "C:\Users\Lucas Saraiva\Pictures\Gag_viewer" & img_id
        Else
            My.Computer.FileSystem.CreateDirectory("C:\Users\Lucas Saraiva\Pictures\Gag_viewer")
            My.Computer.Network.DownloadFile(strprev(0), _
"C:\Users\Lucas Saraiva\Pictures\Gag_viewer" & img_id)
            PictureBox1.ImageLocation = "C:\Users\Lucas Saraiva\Pictures\Gag_viewer" & img_id
        End If

Como tal só fica guardado no meu usuário e não nos dos outros também .... é possivel guardar na pasta pictures dos usuários comuns ? por exemplo inves de lucas saraiva ele se chamasse marco ou joão como faria ?

EDIT: GeSHi adicionado

E o Impossível foi criado por pessoas fracas pra acabar com o sonho das pessoas fortes. Não deixes que acabem com o teu. Sonha , luta , ambiciona e realiza. Se amas , se gostas tu vais conseguir. Cala todas as pessoas que um dia duvidaram de ti e prova que foste mais forte de qualquer outro.

Link to comment
Share on other sites

Caça , que seria do sub-forum vb .net sem ti  😁 Thanks

E o Impossível foi criado por pessoas fracas pra acabar com o sonho das pessoas fortes. Não deixes que acabem com o teu. Sonha , luta , ambiciona e realiza. Se amas , se gostas tu vais conseguir. Cala todas as pessoas que um dia duvidaram de ti e prova que foste mais forte de qualquer outro.

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.