Discussion :

[OxGaming]

Bonjour
Je m'amuse de temps en temps à coder,
Je voulais enfaite, crée un dossier puis mettre un fichier dedans,
voila ce que j'ai utilisée :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Public Class Form1
 
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        f System.IO.Directory.Exists("Chat'Ox") = False Then
        System.IO.Directory.CreateDirectory("Chat'Ox")
        My.Computer.Network.DownloadFile(
     "https://www.dropbox.com/s/qezkm04juf3vlak/si%20tu%20vois%20sa%20sur%20ton%20bureau%2Ccest%20bie.txt",
     "..\..\Chat'Ox\si tu vois sa sur ton bureau,cest bie")
    End Sub
End Class

Mais apparemment il y a plusieurs bugs,...

Quelqu'un pour m'aider ??

Merci amis développeurs =)

[wallace1]

Bonsoir oxgaming,

Ton lien de téléchargement n'est absolument pas bon !!!

Voilà le lien direct lorsque tu survols le bouton télécharger :

http://imabox.fr/a3/1429032111cA0vez55.bmp

https://dl.dropboxusercontent.com/s/...bPrd0A_hs041hw

Donc voilà comment télécharger correctement ton lien et le mettre sur ton bureau :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
My.Computer.Network.DownloadFile("https://dl.dropboxusercontent.com/s/qezkm04juf3vlak/si%20tu%20vois%20sa%20sur%20ton%20bureau%2Ccest%20bie.txt?dl=1&token_hash=AAF4n4bkjktyLnp6dHPTAmxM9XOpuCmJbPrd0A_hs041hw", My.Computer.FileSystem.SpecialDirectories.Desktop & "\si tu vois sa sur ton bureau,cest bie.txt")

A+

[OxGaming]

Juste euhh..
Enfaite tu vois le fichier : Si tu vois sa sur ton bureau, cest bie,
J'aimerais le mettre dans le dossier Chat'Ox !
Alors la ligne de code :

My.Computer.FileSystem.SpecialDirectories.Desktop & "\si tu vois sa sur ton bureau,cest bie.txt")

J'ai modifié le .Desktop et mis le dossier Chat'Ox.
Mais sa ne marche pas !

[OxGaming]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Public Class Form1
 
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        If System.IO.Directory.Exists("Chat'Ox") = False Then
            System.IO.Directory.CreateDirectory("Chat'Ox")
        End If
        My.Computer.Network.DownloadFile("https://dl.dropboxusercontent.com/s/qezkm04juf3vlak/si%20tu%20vois%20sa%20sur%20ton%20bureau%2Ccest%20bie.txt?dl=1&token_hash=AAF4n4bkjktyLnp6dHPTAmxM9XOpuCmJbPrd0A_hs041hw", My.Computer.FileSystem.MoveFile.chat'Ox & "\si tu vois sa sur ton bureau,cest bie.txt")
    End Sub
End Class

[wallace1]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        If System.IO.Directory.Exists(My.Computer.FileSystem.SpecialDirectories.Desktop & "\Chat'Ox") = False Then
            System.IO.Directory.CreateDirectory(My.Computer.FileSystem.SpecialDirectories.Desktop & "\Chat'Ox")
        End If
        My.Computer.Network.DownloadFile("https://dl.dropboxusercontent.com/s/qezkm04juf3vlak/si%20tu%20vois%20sa%20sur%20ton%20bureau%2Ccest%20bie.txt?dl=1&token_hash=AAF4n4bkjktyLnp6dHPTAmxM9XOpuCmJbPrd0A_hs041hw", My.Computer.FileSystem.SpecialDirectories.Desktop & "\Chat'Ox\si tu vois sa sur ton bureau,cest bie.txt")

[OxGaming]

Je souhaiterais mettre ce chat en lien car le truc que j'ai demandée cétait pour faire un chat
Donc ce lien la : https://www.dropbox.com/s/2abjyv1fd9...Ox.application
Comment je peux faire pour trouver le vrai lien?

[OxGaming]

Pour transformer un .application en .exe une idée ??
car je vais utiliser ("Shell") mais faut avoir le logiciel en .exe =)

[wallace1]

Bon ok,

C'est devenu visiblement de la demande de code à la carte alors pour faire simple :

Tu veux récupérer le Direct Link alors :

- tu utilises la classe WebClient
- tu appelles la méthode DownloadString sans oublier de passer le lien de ton dropBox en tant qu'argument
- tu récupères le résultat dans une variable de type String
- enfin, à toi d'analyser le contenu pour savoir quoi rechercher et quoi fusionner comme résultat.....

Bon codage...

A+