Autorun maker

Soyez le premier à donner votre avis sur cette source.

Vue 3 539 fois - Téléchargée 459 fois

Description

Un créateur d'autorun, code simple..
Ciao

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

miko500
Messages postés
188
Date d'inscription
dimanche 29 octobre 2000
Statut
Membre
Dernière intervention
18 août 2005
-
Commentaires svp, merci
pcpunch
Messages postés
1247
Date d'inscription
mardi 7 mai 2002
Statut
Membre
Dernière intervention
18 février 2019
3 -
Ben y a pas grand chose a dire!!! a part que tu pourrait placer le code et non un zip pour si peu!!!!

Peu etre utile a un debutant certainement , mais tu aurais du y ajouter des commentaires!!

Sinon pour moi aucun interêt le code ne m'apporte rien!!!
cs_protect
Messages postés
87
Date d'inscription
lundi 19 mai 2003
Statut
Membre
Dernière intervention
15 mai 2011
2 -
Oui c'est plutot bien fallait avoir l'idée mais rajouter un common dialogs pour choisir l'amplacement du .ini sa peut etre bien
et la protection:
If text1.text = "" then
msgbox "Veuillez indiquez le nom du programme",vbcritical
exit sub
end if
à ajouter pour la command1 serais peut etre meilleur....
7/10
cs_Bl0tCh
Messages postés
74
Date d'inscription
dimanche 2 novembre 2003
Statut
Membre
Dernière intervention
6 septembre 2008
-
meme pour un débutant (je le sais j'en suis un) ça n'apporte pas grand chose à part ecrire dans un fichier
thierrydelepine
Messages postés
521
Date d'inscription
mardi 24 décembre 2002
Statut
Membre
Dernière intervention
11 septembre 2008
4 -
bof, c'est plus rapide de se creer soit meme le fichier avec le bloc notes, et le code est zero a part le open et deux Msgbox ???????

pour un fichier INI, il y a une facon plus propre pour le traiter.

Private Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long

Function EcrireINI(fichier As String, Entete As String, Variable As String, Valeur As String) As String

EcrireINI = WritePrivateProfileString(Entete, Variable, Valeur, fichier)

End Function

cela ne vaut pas grand chose 1/10

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.