AccueilCodesTutorielsForumsEmploiLivresConnexion

  • Javascript / Ajax / DHTML CodeS-SourceS
  • RSS CodeS-SourceS
  • CodyxBot, le Bot GTalk & MSN qu'il vous faut !
  • Générez des revenus avec vos codes, scripts et tutoriaux
  • Aide à la navigation du site
begin process at 2008 11 20 12:38:49
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

GENERATEUR DE CODE VBSSCRIPT


Information sur la source

Catégorie :Formulaire Niveau : Débutant Date de création : 20/08/2004 Vu / téléchargé: 8 642 / 231
Auteur : abdelaziz_info Site perso
Ecrire un message privé
Note :
Aucune note
Commentaire sur cette source (0)
Ajouter un commentaire et/ou une note

Description

générateur très pratique pour créer et générer des codes qui vous permettent de trouver rapidement vos fichiers et vos programmes ;
et éditez facilement un code qui vous permet de créer tous les raccourcis vers tous vos fichiers et programmes ….

il suffit de parcourir vos répertoires et cliquez sur le fichier ou le programme que vous choisissez et donnez un nom a votre nouveau raccourci, enregistrez le et refaites la même chose pour le raccourci suivant, autant de fois que vous voulez; en suite par un simple clique sur le fichier VBS qui contient le code que vous y avez copié auparavant, vous aurez touts vos raccourcis sur le bureau à touts les coups.

…finit la panique,si un raccourci a été supprimé … ou a glissé à quelque part, ne perdez plus de temps à rechercher, et si vous ne vous rappelez pas du quel s’agit il, un clique suffit pour que tous soient rétablis.  

 

Source

  • <SCRIPT LANGUAGE="JavaScript">
  • /*ecrit par:abdelaziz rejeb Elalia/Tunisie
  • mail:abdelaziz_info@yahoo.fr
  • site:http://abdelaziz.site.voila.fr
  • */
  • function rac_exe()
  • {
  • }
  • function edicod()
  • {
  • rac_exe()
  • rac_exe_edit = 0;
  • racourci_nom = new Array;
  • document.ScriptForm.reset();
  • document.nb1.src = "http://abdelaziz.site.voila.fr/imagen/n0.gif";
  • document.nb2.src = "http://abdelaziz.site.voila.fr/imagen/n0.gif";
  • }
  • i0 = new Image;
  • i1 = new Image;
  • i2 = new Image;
  • i3 = new Image;
  • i4 = new Image;
  • i5 = new Image;
  • i6 = new Image;
  • i7 = new Image;
  • i8 = new Image;
  • i9 = new Image;
  • imgSrc = new Array;
  • imgSrc[0] = 'images/n0.gif';
  • imgSrc[1] = 'images/n1.gif';
  • imgSrc[2] = 'images/n2.gif';
  • imgSrc[3] = 'images/n3.gif';
  • imgSrc[4] = 'images/n4.gif';
  • imgSrc[5] = 'images/n5.gif';
  • imgSrc[6] = 'images/n6.gif';
  • imgSrc[7] = 'images/n7.gif';
  • imgSrc[8] = 'images/n8.gif';
  • imgSrc[9] = 'images/n9.gif';
  • i0.src = imgSrc[0];
  • i1.src = imgSrc[1];
  • i2.src = imgSrc[2];
  • i3.src = imgSrc[3];
  • i4.src = imgSrc[4];
  • i5.src = imgSrc[5];
  • i6.src = imgSrc[6];
  • i7.src = imgSrc[7];
  • i8.src = imgSrc[8];
  • i9.src = imgSrc[9];
  • i20 = new Image;
  • i20.src = 'images/commun_top_on.gif';
  • rac_exe_edit = 0;
  • racourci_nom = new Array;
  • repertoire = new Array;
  • function rac_enregistre()
  • {
  • rac_exe_edit++;
  • a=rac_exe_edit-0;
  • racourci_nom[a] = document.ParaForm.racour.value;
  • repertoire[a] = document.ParaForm.file.value;
  • document.ParaForm.file.value = "";
  • if (rac_exe_edit <10)
  • {
  • rac_exe_edit = "0" + rac_exe_edit;
  • }
  • else
  • {
  • rac_exe_edit = "" + rac_exe_edit;
  • }
  • racnb = rac_exe_edit.charAt(0);
  • document.nb1.src = "http://abdelaziz.site.voila.fr/imagen/n" + racnb + ".gif";
  • filnb = rac_exe_edit.charAt(1);
  • document.nb2.src = "http://abdelaziz.site.voila.fr/imagen/n" + filnb + ".gif";
  • }
  • function editCode()
  • {
  • rac_exe()
  • codtxt = '';
  • codtxt += '\'*****************************************\n\'editer par l\'editeur de abdelaziz rejeb \- Elalia * Tunisie\n\'mail:abdelaziz_info@yahoo.fr\n\'http:\/\/abdelaziz.site.voila.fr\n\'*****************************************\n';
  • codtxt += 'Dim WSHShell\nSet WSHShell = WScript.CreateObject\(\"WScript.Shell\"\)\nDim MyShortcut, MyDesktop, DesktopPath\nDesktopPath = WSHShell.SpecialFolders\(\"Desktop\"\)\n';
  • codtxt += '';
  • nombrerac = (racourci_nom.length)-1;
  • a=1;
  • verif = 0;
  • while (a <= nombrerac)
  • {
  • codtxt += '\nSet rac_exe' + a + ' = WSHShell.CreateShortcut(DesktopPath & \"\\' + racourci_nom[a] + '.lnk")\nrac_exe' + a + '.TargetPath = WSHShell.ExpandEnvironmentStrings\(\"' + repertoire[a] + '")\nrac_exe' + a + '.Save';
  • a++;
  • }
  • codtxt += '';
  • codtxt += '';
  • codtxt += '';
  • document.ScriptForm.code.value = codtxt;
  • alert('ATTENTION : Le code genere doit etre copier direct dans un fichier VBS pour l\'appliquer\n ou dans un document de texte si vous voulez le modifier !!!\nabdelaziz_info@yahoo.fr');
  • }
  • //////////////
  • function editeur(obj)
  • {
  • var copiercode = document.body.createTextRange();
  • copiercode.moveToElementText(obj);
  • copiercode.execCommand("Copy");
  • }
  • </SCRIPT>
  • <center>
  • <!--Enregistrement des raccourcis-->
  • <TABLE WIDTH=459 CELLPADDING=1 CELLSPACING=0>
  • <TR>
  • <TD WIDTH="452" STYLE="padding:4" BGCOLOR="#FFFFFF"><FONT FACE="Verdana, Arial" SIZE=1><B><FONT COLOR="#CC0000"></FONT>
  • <FORM NAME="ParaForm">
  • <TABLE WIDTH=449 CELLPADDING=1 CELLSPACING=0 ALIGN=center>
  • <TR><TD WIDTH="447" ALIGN="center" bgcolor="#FF0000" style="color: #FFFFFF; background-color: #FF0000">
  • <b><span style="font-family: Tahoma"><font size="2">generateur de code VBSScript:
  • <a href="mailto:abdelaziz_info@yahoo.fr" style="text-decoration: none">
  • <font color="#00FF00">abdelaziz_info@yahoo.fr</font></a><font color="#00FF00">
  • </font></font></span></b><TABLE WIDTH=100% CELLPADDING=2 CELLSPACING=0 BORDER=0 BGCOLOR="#003300" style="border-collapse: collapse" bordercolor="#111111">
  • <TR><TD WIDTH="100%" ALIGN="center"><B>
  • <FONT FACE="Tahoma" SIZE=2 COLOR="#FFFFFF">Enregistrement des
  • raccourcis : </FONT></B></TD>
  • </TR><TR>
  • <TD WIDTH="100%" STYLE="padding:4" BGCOLOR="#FFFFFF">
  • <p align="center">
  • </font><B><FONT FACE="Tahoma" SIZE=2>Nombre de raccourci enregistrés :</font>
  • <IMG SRC="http://abdelaziz.site.voila.fr/imagen/n0.gif" BORDER=0 WIDTH=12 HEIGHT=15 NAME="nb1"><IMG SRC="http://abdelaziz.site.voila.fr/imagen/n0.gif" BORDER=0 WIDTH=12 HEIGHT=15 NAME="nb2"><BR><BR>
  • <BR><FONT SIZE=2 FACE="Tahoma">
  • Entrez ici le chemin de votre document, ou&nbsp; parcourir:
  • </font></B></p><CENTER>
  • <p><input title=" pour les raccourcis ver les sites les pages Web et les repertoires: Entrez le chemin complet de votre document exp:(http://...com) - (c:) ... ou Cliquez sur parcourir pour les fichiers et les programmes ...!" type="file" name="file" size="28"></p>
  • <p><B><FONT FACE="Tahoma" SIZE=2>Donnez un nom à votre raccourci ou EXE:&nbsp; </font><BR>
  • <INPUT title=" Tapez un nom pour votre nouveau raccourci .. !" TYPE="text" NAME="racour" SIZE=41><BR><BR>
  • <INPUT TYPE="reset" VALUE="Enregister le Raccourci" onClick="rac_enregistre()"><BR><BR></B></p>
  • </CENTER></TD></TR>
  • </TABLE></TD></TR></TABLE><BR>
  • <CENTER>&nbsp;</CENTER></FORM>
  • <!--edition de code-->
  • <TABLE WIDTH=452 CELLPADDING=1 CELLSPACING=0 BORDER=0 BGCOLOR="#455A87">
  • <TR><TD WIDTH="100%" ALIGN="center">
  • <TABLE WIDTH=100% CELLPADDING=2 CELLSPACING=0 BORDER=0 BGCOLOR="#003300" style="color: #FFFFFF; border-collapse: collapse" bordercolor="#111111">
  • <TR><TD WIDTH="100%" ALIGN="center" bordercolor="#FF0000"><FONT FACE="Verdana, Arial" SIZE=1><B>
  • <font size="2" color="#FFFFFF" face="Tahoma">éditez votre code :</font></b></font><B>
  • <TR><TD WIDTH="100%" STYLE="padding:4" BGCOLOR="#FFFFFF">
  • <p align="center">
  • <br align="center"><B><INPUT TYPE=button VALUE="Editer le code !" onClick="editCode()">
  • <INPUT TYPE=button VALUE="Retablir !" onClick="edicod()"></b></font></p>
  • </p><p align="center"><FONT FACE="Tahoma" SIZE=2><B>
  • <span style="background-color: #FF0000">&nbsp; Voici le code&nbsp; à inserer dans
  • un fichier VBS&nbsp; nommé (mes raccourcis):&nbsp; </span>
  • </b></font></p>
  • <FORM NAME="ScriptForm">
  • <INPUT TYPE="hidden" NAME="s_id" VALUE="nav_07">
  • <CENTER><TEXTAREA NAME="code" COLS=52 ROWS=9 WRAP=physical></TEXTAREA><p><INPUT onclick=javascript:this.form.code.focus();this.form.code.select(); type=button value="Sélectionner tout">
  • <INPUT TYPE=button VALUE="Copiez" onClick="editeur(document.ScriptForm.code)"><BR></p>
  • </HTML>
<SCRIPT LANGUAGE="JavaScript">
/*ecrit par:abdelaziz rejeb Elalia/Tunisie
mail:abdelaziz_info@yahoo.fr
site:http://abdelaziz.site.voila.fr
*/
function rac_exe()
{
}
function edicod()
{
rac_exe()
rac_exe_edit = 0;
racourci_nom = new Array;
document.ScriptForm.reset();
document.nb1.src = "http://abdelaziz.site.voila.fr/imagen/n0.gif";
document.nb2.src = "http://abdelaziz.site.voila.fr/imagen/n0.gif";
}
i0 = new Image;
i1 = new Image;
i2 = new Image;
i3 = new Image;
i4 = new Image;
i5 = new Image;
i6 = new Image;
i7 = new Image;
i8 = new Image;
i9 = new Image;
imgSrc = new Array;
imgSrc[0] = 'images/n0.gif';
imgSrc[1] = 'images/n1.gif';
imgSrc[2] = 'images/n2.gif';
imgSrc[3] = 'images/n3.gif';
imgSrc[4] = 'images/n4.gif';
imgSrc[5] = 'images/n5.gif';
imgSrc[6] = 'images/n6.gif';
imgSrc[7] = 'images/n7.gif';
imgSrc[8] = 'images/n8.gif';
imgSrc[9] = 'images/n9.gif';
i0.src = imgSrc[0];
i1.src = imgSrc[1];
i2.src = imgSrc[2];
i3.src = imgSrc[3];
i4.src = imgSrc[4];
i5.src = imgSrc[5];
i6.src = imgSrc[6];
i7.src = imgSrc[7];
i8.src = imgSrc[8];
i9.src = imgSrc[9];
i20 = new Image;
i20.src = 'images/commun_top_on.gif';
rac_exe_edit = 0;
racourci_nom = new Array;
repertoire = new Array;
function rac_enregistre()
{
rac_exe_edit++;
a=rac_exe_edit-0;
racourci_nom[a] = document.ParaForm.racour.value;
repertoire[a] = document.ParaForm.file.value;
document.ParaForm.file.value = "";
if (rac_exe_edit <10)
{
rac_exe_edit = "0" + rac_exe_edit;
}
else
{
rac_exe_edit = "" + rac_exe_edit;
}
racnb = rac_exe_edit.charAt(0);
document.nb1.src = "http://abdelaziz.site.voila.fr/imagen/n" + racnb + ".gif";
filnb = rac_exe_edit.charAt(1);
document.nb2.src = "http://abdelaziz.site.voila.fr/imagen/n" + filnb + ".gif";
}
function editCode()
{
rac_exe()
codtxt = '';
codtxt += '\'*****************************************\n\'editer par l\'editeur de abdelaziz rejeb \- Elalia * Tunisie\n\'mail:abdelaziz_info@yahoo.fr\n\'http:\/\/abdelaziz.site.voila.fr\n\'*****************************************\n';
codtxt += 'Dim WSHShell\nSet WSHShell = WScript.CreateObject\(\"WScript.Shell\"\)\nDim MyShortcut, MyDesktop, DesktopPath\nDesktopPath = WSHShell.SpecialFolders\(\"Desktop\"\)\n';
codtxt += '';
nombrerac = (racourci_nom.length)-1;
a=1;
verif = 0;
while (a <= nombrerac)
{
codtxt += '\nSet rac_exe' + a + ' = WSHShell.CreateShortcut(DesktopPath & \"\\' + racourci_nom[a] + '.lnk")\nrac_exe' + a + '.TargetPath = WSHShell.ExpandEnvironmentStrings\(\"' + repertoire[a] + '")\nrac_exe' + a + '.Save';
a++;
}
codtxt += '';
codtxt += '';
codtxt += '';
document.ScriptForm.code.value = codtxt;
alert('ATTENTION : Le code genere doit etre copier direct dans un fichier VBS pour l\'appliquer\n ou dans un document de texte si vous voulez le modifier   !!!\nabdelaziz_info@yahoo.fr');
}	
//////////////
function editeur(obj)
{
var copiercode = document.body.createTextRange();
copiercode.moveToElementText(obj);
copiercode.execCommand("Copy");
}
</SCRIPT>
<center>
<!--Enregistrement des raccourcis-->
<TABLE WIDTH=459 CELLPADDING=1 CELLSPACING=0>
<TR>
<TD WIDTH="452" STYLE="padding:4" BGCOLOR="#FFFFFF"><FONT FACE="Verdana, Arial" SIZE=1><B><FONT COLOR="#CC0000"></FONT>
<FORM NAME="ParaForm">
<TABLE WIDTH=449 CELLPADDING=1 CELLSPACING=0 ALIGN=center>
<TR><TD WIDTH="447" ALIGN="center" bgcolor="#FF0000" style="color: #FFFFFF; background-color: #FF0000">
<b><span style="font-family: Tahoma"><font size="2">generateur de code VBSScript: 
<a href="mailto:abdelaziz_info@yahoo.fr" style="text-decoration: none">
<font color="#00FF00">abdelaziz_info@yahoo.fr</font></a><font color="#00FF00">
</font></font></span></b><TABLE WIDTH=100% CELLPADDING=2 CELLSPACING=0 BORDER=0 BGCOLOR="#003300" style="border-collapse: collapse" bordercolor="#111111">
<TR><TD WIDTH="100%" ALIGN="center"><B>
<FONT FACE="Tahoma" SIZE=2 COLOR="#FFFFFF">Enregistrement des 
raccourcis : </FONT></B></TD>
</TR><TR>
<TD WIDTH="100%" STYLE="padding:4" BGCOLOR="#FFFFFF">
<p align="center">
</font><B><FONT FACE="Tahoma" SIZE=2>Nombre de raccourci enregistrés :</font>
<IMG SRC="http://abdelaziz.site.voila.fr/imagen/n0.gif" BORDER=0 WIDTH=12 HEIGHT=15 NAME="nb1"><IMG SRC="http://abdelaziz.site.voila.fr/imagen/n0.gif" BORDER=0 WIDTH=12 HEIGHT=15 NAME="nb2"><BR><BR>
<BR><FONT SIZE=2 FACE="Tahoma"> 
Entrez ici le chemin de votre document, ou&nbsp; parcourir:
</font></B></p><CENTER>
<p><input title=" pour les raccourcis ver les sites les pages Web et les repertoires: Entrez le chemin complet de votre document exp:(http://...com) - (c:)  ... ou Cliquez sur parcourir pour les fichiers et les programmes ...!" type="file" name="file" size="28"></p>
<p><B><FONT FACE="Tahoma" SIZE=2>Donnez un nom à votre raccourci ou EXE:&nbsp; </font><BR>
<INPUT title=" Tapez un nom pour votre nouveau raccourci .. !" TYPE="text" NAME="racour" SIZE=41><BR><BR>
<INPUT TYPE="reset" VALUE="Enregister le Raccourci" onClick="rac_enregistre()"><BR><BR></B></p>
</CENTER></TD></TR>
</TABLE></TD></TR></TABLE><BR>
<CENTER>&nbsp;</CENTER></FORM>
<!--edition de code-->
<TABLE WIDTH=452 CELLPADDING=1 CELLSPACING=0 BORDER=0 BGCOLOR="#455A87">
<TR><TD WIDTH="100%" ALIGN="center">
<TABLE WIDTH=100% CELLPADDING=2 CELLSPACING=0 BORDER=0 BGCOLOR="#003300" style="color: #FFFFFF; border-collapse: collapse" bordercolor="#111111">
<TR><TD WIDTH="100%" ALIGN="center" bordercolor="#FF0000"><FONT FACE="Verdana, Arial" SIZE=1><B>
<font size="2" color="#FFFFFF" face="Tahoma">éditez votre code :</font></b></font><B>
<TR><TD WIDTH="100%" STYLE="padding:4" BGCOLOR="#FFFFFF">
<p align="center">
<br align="center"><B><INPUT TYPE=button VALUE="Editer le code !" onClick="editCode()">
<INPUT TYPE=button VALUE="Retablir !" onClick="edicod()"></b></font></p>
</p><p align="center"><FONT FACE="Tahoma" SIZE=2><B>
<span style="background-color: #FF0000">&nbsp; Voici le code&nbsp; à inserer dans 
un fichier VBS&nbsp; nommé (mes raccourcis):&nbsp; </span>
</b></font></p>
<FORM NAME="ScriptForm">
<INPUT TYPE="hidden" NAME="s_id" VALUE="nav_07">
<CENTER><TEXTAREA NAME="code" COLS=52 ROWS=9 WRAP=physical></TEXTAREA><p><INPUT onclick=javascript:this.form.code.focus();this.form.code.select(); type=button value="Sélectionner tout">
<INPUT TYPE=button VALUE="Copiez" onClick="editeur(document.ScriptForm.code)"><BR></p>
</HTML>

Fichier Zip

Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip

Commentaires et avis

Aucun commentaire pour le moment.

Ajouter un commentaire

Nos sponsors

Sondage...

CalendriCode

Novembre 2008
LMMJVSD
     12
3456789
10111213141516
17181920212223
24252627282930

Consulter la suite du CalendriCode


Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,359 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.