TÉLÉCHARGEMENT DE FICHIER AVEC TOUTES LES INFOS DEPUIS UN MODULE EN 100 LIGNES
cs_Willi
Messages postés
2375
Date d'inscription
jeudi 12 juillet 2001
Statut
Modérateur
Dernière intervention
15 décembre 2018
-
9 sept. 2006 à 12:33
Alain95350 Messages postés 16 Date d'inscription vendredi 3 novembre 2000 Statut Membre Dernière intervention 5 juin 2008 - 6 juin 2008 à 20:31
Alain95350 Messages postés 16 Date d'inscription vendredi 3 novembre 2000 Statut Membre Dernière intervention 5 juin 2008 - 6 juin 2008 à 20:31
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/39496-telechargement-de-fichier-avec-toutes-les-infos-depuis-un-module-en-100-lignes
https://codes-sources.commentcamarche.net/source/39496-telechargement-de-fichier-avec-toutes-les-infos-depuis-un-module-en-100-lignes
6 juin 2008 à 20:31
(je chercha&is depuis qq temps sur le net comment faire et je me suis mis a parler javaNet et à faire des Php...
alors que la solution était ici ... sur mon site de référence en plus.
tu as vu mon petit WallPaper en .bat ?
voilà le script : (.BAT)
set /a PauseS=30
set RepImg="D:\Mes images\Pour fond d ecran"
set RepTrav="H:\Projet\WallPaper\-BAT\ImgWallpaper"
set uBmp="bmp"
@echo off
REG ADD "HKCU\Control Panel\Desktop" /V WallpaperStyle /T REG_SZ /F /D 1 > %temp%\temp.txt
REG ADD "HKCU\Control Panel\Desktop" /V TileWallpaper /T REG_SZ /F /D 1 > %temp%\temp.txt
:: liste des fichiers du repertoire et de ses sous-repertoires
dir /s /b /a:-d %RepImg%\*.* > ListFicImg.txt
set compteurA=-1
for /f %%a in (ListFicImg.txt) do set /a CompteurA+=1
:boucle
:: choix aleatoire d une image (et réinitialise la variable à non définie)
set "FicSrc="
set /a nombre=%random%%%%CompteurA%
for /f "skip=%nombre% delims=" %%a in (ListFicImg.txt) do (if not defined FicSrc set FicSrc=%%a)
echo rundll32.exe C:\WINDOWS\system32\shimgvw.dll,ImageView_Fullscreen %FicSrc% > CmdDernieresImages.bat
:: Commande adressée à Windows pour le backGround Wallpaper (format converti en bmp si besoin)
del %RepTrav%*.%uBmp%
call "H:\Program Files\ImageMagick-6.4.1-Q16\convert.exe" "%FicSrc%" %RepTrav%.%uBmp%
REG ADD "HKCU\Control Panel\Desktop" /V Wallpaper /T REG_SZ /F /D "%RepTrav%.%uBmp%" > %temp%\temp.txt
%SystemRoot%\System32\RUNDLL32.EXE user32.dll, UpdatePerUserSystemParameters
call "H:\Systeme\Installateur\sleep.exe" %PauseS%
goto :boucle
- - -
salut...
1 févr. 2008 à 15:49
31 janv. 2008 à 17:06
31 janv. 2008 à 16:58
Ba tu copies le code dans un module vide (aucune ligne ou alors tu les effaces). Ensuite tu lances le téléchargement par la procédure downloadfile
29 janv. 2008 à 18:07
29 janv. 2008 à 18:00
http://msdn2.microsoft.com/fr-fr/express/aa975050.aspx
28 janv. 2008 à 18:41
28 janv. 2008 à 18:04
28 janv. 2008 à 13:57
27 oct. 2007 à 17:06
27 oct. 2007 à 02:35
13 sept. 2006 à 13:50
Sinon je n'ai fait aucune source projet, le code a été testé dans un projet que je fait depuis 2 ans, et le code de ce projet est secret mais la fenêtre (la photo) en fait parti. Merci pour vos commentaires.
13 sept. 2006 à 12:32
il est vrai que je ne dors pas assé lol
13 sept. 2006 à 11:19
Pk ne pas avoir joint ta source ? ca aurait ete pas mal
13 sept. 2006 à 11:06
jai carrement tester le code dans un projet pour voir
hors je me suis apercu que lon a une exception de levée a cause du timer
car au bout dun moment lacces au repertoire est refusé
et donc finalement le fichier n'est pas du tout downloader vers la cible :/
13 sept. 2006 à 07:45
Pour ce qui est de la source, elle est pas mal. C'est vraiment très agréable de lire un code aussi bien commenté.
13 sept. 2006 à 05:25
autrement cool
9 sept. 2006 à 12:33
My.Computer.Network.DownloadFile("http://www.tonserveur/tonfichier.zip", "C:\tonfichier.zip", "", "", True, 100, False)
Mais le tiens est plus complet :)
Bon code et bonne continuation.
++