bon je viens de regarder les sources...hum hum!! lol le prend pas mal mais c pas tip top
pour ce genre de programme tu vois, je pense qu'il faut prendre du recul et s'imaginer une situation plus...grande. Je m'explique : image que dans 5 mois tu veuille reprendre ton source, et faire en sorte qu'il prenne un dossier avec 100 images, tu vas faire 125 fois un copier-coller?
non, le truc vraiment ideal serait de configurer un ou plusieurs repertoires qui contiennent les fichiers images. Ensuite au demarrage on prend une image au hasard dans la liste des images des repertoires. Tu vois ce que je veu dire?
donc en clair, si tu veu faire ca, il te faudrait utiliser les directoryEntry pour lister les entrées ( fichiers images) des repertoires, des fonctions random ( cf exemple en fin), et des accès au registre ( ce que tu fais dejà)
si tu veu plus de details fais moi signe ;)
Ensuite, si tu veu programmer plus "propre", utilise les classe du framework pour l'accès au registre ( registry )plutot que le WScript : ca c'était utilisé sous VB6, mnt on est des grands et on utilise VB.NET.
Enfin, evite de déclarer les objets sans typage ( cf "Dim NI") car celà ralentit les traitements : ici ca ne pose de pb mais dans d'autre cas ca pourrait te jouer de mauvais tour !!!
voilà bonne prog ++
Dim ran As New Random(Now.Millisecond)
Dim i As Integer
Randomize()
Dim j As Integer
For j = 0 To 10
i = ran.Next Mod 10
MsgBox(i)
Next
lol donc :
service windows : ca permet a l'exec de se lancer au démarrage de windows et de tourner en arriere plan ( click droit sur le poste de travail->services)
ensuite g windows xp et il prend le format jpeg
ensuite si tu ne touche qu'au registre, pkoi copier les images???
pour lees arguments de la ligne de commande :
Dim commands As String = Microsoft.VisualBasic.Command()
select case commands.indexof("-")
case is <> -1
...
case is = -1
...
end select
...
> Tu as raison, seulement je ne sais pas faire un seul exécutable avec 2 partie, avec - qqchose (si tu sais comment on fait, peut-tu-me le dire ...)
> Mais justement, c'est ça que fais le prog !
<en plus en bmp, le format le plus lourd)>
> T'as raison, mais Windows accèpte que les image bitmap pour le fond d'écran (dumoins, sur mon pc)
<restrictions du nombres d'images ( max 8 min 2 )>
> C'est logique qu'il faut min 2 image (si ya qu'une image, comment va-elle changer ?!)
max 8 : Je trouve que 8, c'est déja pas mal. (Pour en mettre plus, ta qu'a faire des copier/coller de certains code et de changer le n°)
<faire ton exec en style service windows>
> ça veut dire quoi ???
Merci pour tes commentaires.
Merci
pour ce genre de programme tu vois, je pense qu'il faut prendre du recul et s'imaginer une situation plus...grande. Je m'explique : image que dans 5 mois tu veuille reprendre ton source, et faire en sorte qu'il prenne un dossier avec 100 images, tu vas faire 125 fois un copier-coller?
non, le truc vraiment ideal serait de configurer un ou plusieurs repertoires qui contiennent les fichiers images. Ensuite au demarrage on prend une image au hasard dans la liste des images des repertoires. Tu vois ce que je veu dire?
donc en clair, si tu veu faire ca, il te faudrait utiliser les directoryEntry pour lister les entrées ( fichiers images) des repertoires, des fonctions random ( cf exemple en fin), et des accès au registre ( ce que tu fais dejà)
si tu veu plus de details fais moi signe ;)
Ensuite, si tu veu programmer plus "propre", utilise les classe du framework pour l'accès au registre ( registry )plutot que le WScript : ca c'était utilisé sous VB6, mnt on est des grands et on utilise VB.NET.
Enfin, evite de déclarer les objets sans typage ( cf "Dim NI") car celà ralentit les traitements : ici ca ne pose de pb mais dans d'autre cas ca pourrait te jouer de mauvais tour !!!
voilà bonne prog ++
Dim ran As New Random(Now.Millisecond)
Dim i As Integer
Randomize()
Dim j As Integer
For j = 0 To 10
i = ran.Next Mod 10
MsgBox(i)
Next
service windows : ca permet a l'exec de se lancer au démarrage de windows et de tourner en arriere plan ( click droit sur le poste de travail->services)
ensuite g windows xp et il prend le format jpeg
ensuite si tu ne touche qu'au registre, pkoi copier les images???
pour lees arguments de la ligne de commande :
Dim commands As String = Microsoft.VisualBasic.Command()
select case commands.indexof("-")
case is <> -1
...
case is = -1
...
end select
...
allé je v regarder les sources ;)
> Tu as raison, seulement je ne sais pas faire un seul exécutable avec 2 partie, avec - qqchose (si tu sais comment on fait, peut-tu-me le dire ...)
> Mais justement, c'est ça que fais le prog !
<en plus en bmp, le format le plus lourd)>
> T'as raison, mais Windows accèpte que les image bitmap pour le fond d'écran (dumoins, sur mon pc)
<restrictions du nombres d'images ( max 8 min 2 )>
> C'est logique qu'il faut min 2 image (si ya qu'une image, comment va-elle changer ?!)
max 8 : Je trouve que 8, c'est déja pas mal. (Pour en mettre plus, ta qu'a faire des copier/coller de certains code et de changer le n°)
<faire ton exec en style service windows>
> ça veut dire quoi ???