recherche infructueuse sur les bases de registre

recherche infructueuse sur les bases de registre - Java - Programmation

Marsh Posté le 05-08-2002 à 10:35:56    

salut a tous,
 
j ai cherché comment ajouter une clé dans la base de registre, mais j ai pas trouvé....
 
donc comment fait on pour ajouter une clé (en fait je voudrais que mon programme se lance au démarrage).
 
j ai pensé à une autre solution ajouter un raccourci dans le menu demaarrage. Mais la problemes :
   => comment créer un raccourci
   => comment acceder au dossier (System.getProperty("..." ))
 
merci pour vos reponses
bruno ;-}

Reply

Marsh Posté le 05-08-2002 à 10:35:56   

Reply

Marsh Posté le 05-08-2002 à 10:51:12    

Y a une api qui permet d'écrire dans la base mais bon c pas super propre. Ton appli ne tourne que sous windows?


---------------
Just because you feel good does not make you right
Reply

Marsh Posté le 05-08-2002 à 10:55:10    

non elle tourne sous win, linux et mac.
 
Mais la base de registre n est que pour windows...

Reply

Marsh Posté le 05-08-2002 à 11:24:35    

oui merci j'avais compris. Donc tu vas releaser un soft java en une version Windows et une version cross platform si je comprends bien ?


---------------
Just because you feel good does not make you right
Reply

Marsh Posté le 05-08-2002 à 11:39:23    

Citation :

oui merci j'avais compris. Donc tu vas releaser un soft java en une version Windows et une version cross platform si je comprends bien ?


 
oui c ca en fait on veut diffuser le logiciel sur un maximum de plate forme, avec des particularites pour windows. Car les utilisateurs de windows sont des personnes un peu moins calées en informatique. Je veux dire par là que même les nuls savent utiliser windows (par rapport à linux). donc pour ces personnes o, voudrait leur faire tout le travail (installation, exécution...).
 
d ailleurs on cherche un "installateur" pour notre logiciel sous windows, si tu en connais ...
 
on a vu installanywhere mais la licence est pas donné vu nos moyens.....

Reply

Marsh Posté le 05-08-2002 à 11:42:14    

:heink: à la limite si tu voulais LIRE dans la b.reg je pourrais comprendre, mais y écrire :heink:, je vois pas ce que ça va changer pour des "gens pas calés en info"
enfin bon, ce que j'en dis

Reply

Marsh Posté le 05-08-2002 à 11:43:45    

J'ai eu le meme genre de projet pour et le meme genre de problème. J'utilise NullSoft installer qui est gratuit et qui a un language de scripting vachement balaise.
 
 
Le truc c'est que tu peux écrire des clés les doits dans le nez avec cet installer. Tu peux meme mettre à jour la variable classpath et la variable path :)
 
En gros ca m'installe mon appli Java et les fichiers de config et l'utilisateur n'a rien à faire.
 
Si tu veux des infos c'est open source (pas le script de nullsoft ceci dit mais je peux te le filer)
 
A+


---------------
Just because you feel good does not make you right
Reply

Marsh Posté le 05-08-2002 à 11:45:02    

--greg-- a écrit a écrit :

 :heink: à la limite si tu voulais LIRE dans la b.reg je pourrais comprendre, mais y écrire :heink:, je vois pas ce que ça va changer pour des "gens pas calés en info"
enfin bon, ce que j'en dis




 
bin qd t'as un soft et que tu dois le rendre "public" faut faire les trucs à la place des utilisateurs. Toi si tu dois ajouter une truc dans ton path ou dans ton classpath tu t'en fous mais monsieur tout le monde c'est la galère pour lui.
 
Y a pas que des softs pour les techniciens hein ;)
 
Sinon bruno tu as pensé à Java Web start ?


---------------
Just because you feel good does not make you right
Reply

Marsh Posté le 05-08-2002 à 11:46:13    

ca fait koi java web start ??

Reply

Marsh Posté le 05-08-2002 à 11:47:43    

DarkLord a écrit a écrit :

 
 
bin qd t'as un soft et que tu dois le rendre "public" faut faire les trucs à la place des utilisateurs. Toi si tu dois ajouter une truc dans ton path ou dans ton classpath tu t'en fous mais monsieur tout le monde c'est la galère pour lui.
 
Y a pas que des softs pour les techniciens hein ;)
 
Sinon bruno tu as pensé à Java Web start ?



et les .bat c pour les chiens?:O

Reply

Marsh Posté le 05-08-2002 à 11:47:43   

Reply

Marsh Posté le 05-08-2002 à 11:51:17    

Citation :

darklord
J'ai eu le meme genre de projet pour et le meme genre de problème. J'utilise NullSoft installer qui est gratuit et qui a un language de scripting vachement balaise.  
 
 
Le truc c'est que tu peux écrire des clés les doits dans le nez avec cet installer. Tu peux meme mettre à jour la variable classpath et la variable path :)  
 
En gros ca m'installe mon appli Java et les fichiers de config et l'utilisateur n'a rien à faire.  
 
Si tu veux des infos c'est open source (pas le script de nullsoft ceci dit mais je peux te le filer)  
 
A+


oui merci je veux bien ;-}
je regarde de suite nullsoft installer

Reply

Marsh Posté le 05-08-2002 à 11:51:55    

bruno5678 a écrit a écrit :

ca fait koi java web start ??




 
un plugin qui te permet de lancer une appli Java standard depuis un navigateur. En gros ton user clique, ca télécharge l'appli si il n'est pas à jour (sinon ca télécharge rien) et ca la lance dans une fenetre d'appli normale.
 
C'est tout les avantages de l'applet avec tous les avantages de l'appli


---------------
Just because you feel good does not make you right
Reply

Marsh Posté le 05-08-2002 à 11:52:56    

--greg-- a écrit a écrit :

et les .bat c pour les chiens?:O




 
arrete un peu de raconter n'importe quoi. T'as tord point barre :p
 
et le fichier batch c'est ki qui va le définir. Si tu fais des rép relatifs, tu sais bien que le premier débile venu va en faire un raccourci sur le bureau et donc au revoir ton appli :)


---------------
Just because you feel good does not make you right
Reply

Marsh Posté le 05-08-2002 à 12:01:16    

nullsoft installer c ca qu il me faut  
par contre la syntaxe du script est pas top clair (c de l anglais...) si tu avais un exemple concret ca m aiderai vachement.
je me replonge la dedans merci encore daklord
 
euh greg je vois pas en koi les .bat va lancer l appli au demarrage ????

Reply

Marsh Posté le 05-08-2002 à 12:05:20    

Code :
  1. ;eConf.nsi
  2. ;
  3. ;Install script by Stéphane Nicoll - Infonet, FUNDP
  5. ;-)Add_Publisher "Infonet group, FUNDP"
  6. ;-)Add_Contact snicoll@info.fundp.ac.be
  7. ;-)Add_Publisher_URL http://www.infonet.fundp.ac.be
  8. ;-)Add_Product_URL http://sourceforge.net/projects/econf
  9. ;-)Add_Comments "Use our mailing list if you have any question"
  12. ; ----- Define version -----
  13. !define VER_MAJOR 0
  14. !define VER_MINOR 1a-beta
  15. !define ROOT_DIR C:
  17. ; ----- Program identification and name -----
  18. Name "eConf v${VER_MAJOR}.${VER_MINOR}"
  19. Caption "eConf v${VER_MAJOR}.${VER_MINOR} Setup"
  20. OutFile "eConf-v${VER_MAJOR}.${VER_MINOR}-setup.exe"
  22. ; ----- Some default compiler settings -----
  23. AutoCloseWindow false
  24. ShowInstDetails show
  25. ShowUninstDetails show
  26. SetCompress auto
  27. SetDatablockOptimize on
  28. SetOverwrite ifnewer
  29. CRCCheck on
  31. ; ----- Components ------
  32. ComponentText "This will install eConf v${VER_MAJOR}.${VER_MINOR} on your computer."
  33. SilentInstall normal
  34. InstType "Typical"
  35. InstType "Minimal"
  36. ;InstType /NOCUSTOM
  37. ;Icon d:\releases\installer\infonet.ico
  38. EnabledBitmap  "C:\e-learning\release\NSIS\contrib\one-check.bmp"    ; Used for components (custom install)
  39. DisabledBitmap "C:\e-learning\release\NSIS\contrib\one-nocheck.bmp"
  41. ; ----- Colors -----
  43. BGGradient 0000FF 000000 FFFFFF
  44. InstallColors FFFFFF 000000
  45. InstProgressFlags smooth colored
  47. ; ----- Installation directory -----
  48. DirShow show
  49. DirText "eConf setup has determined the location to install, select new location if you like then press [INSTALL] to start installation. Please do not use directory with blank spaces!" "eConf v${VER_MAJOR}.${VER_MINOR} will be installed in the following folder:"
  50. ;InstallDir "$PROGRAMFILES\eConf"
  51. InstallDirRegKey HKEY_LOCAL_MACHINE "SOFTWARE\Infonet\eConf" ""
  53. ; ----- License text -----
  54. LicenseText "You must agree to this license before installing."
  55. LicenseData "c:\release\installer\license.txt"
  57. ; ----- INSTALL SECTIONS -----
  59. ;-------------------- eConf INSTALLATION --------------------
  61. Section "eConf (required)"
  62. SectionIn 1 2
  63. SetOutPath $INSTDIR
  64. ; root directory
  65. File "c:\release\eConf\README.txt"
  66. ; /bin directory
  67. File /r "c:\release\eConf\bin"
  68. ; /conf directory
  69. File /r "c:\release\eConf\conf"
  70. ; /lib directory
  71. File /r "c:\release\eConf\lib"
  72. ; /proxy directory
  73. File /r "c:\release\eConf\proxy"
  74. ; /player directory
  75. File /r "c:\release\eConf\player"
  76. ; Register software in the registry
  77. WriteRegStr HKEY_LOCAL_MACHINE "SOFTWARE\Infonet\eConf" "" "$INSTDIR"
  78. WriteRegStr HKEY_LOCAL_MACHINE "Software\Microsoft\Windows\CurrentVersion\Uninstall\WebConf" "DisplayName" "eConf v${VER_MAJOR}.${VER_MINOR} (remove only)"
  79. WriteRegStr HKEY_LOCAL_MACHINE "Software\Microsoft\Windows\CurrentVersion\Uninstall\WebConf" "UninstallString" '"$INSTDIR\uninstall\uninst.exe"'
  80. ; write out uninstaller
  81. WriteUninstaller "$INSTDIR\uninst.exe"
  83. ; Set environment variables
  84. Push "$INSTDIR\bin\"
  85. Call AddToPath
  86. Push "$INSTDIR\lib\econf.jar;$INSTDIR\lib\FTPProtocol.jar;$INSTDIR\lib\activation.jar;$INSTDIR\lib\mail.jar;$INSTDIR\lib\smtp.jar;$INSTDIR\lib\xerces.jar;$INSTDIR\proxy\classes\jigsaw.zip"
  87. Call AddToClassPath
  88. Push "ECONF_HOME"
  89. Push $INSTDIR
  90. Call CreateEnvVar
  91. SectionEnd ;
  93. ; --------------------- SHORTCUTS -----------------------------
  95. Section "Create program files"
  96. SectionIN 1 2
  97. CreateDirectory "$SMPROGRAMS\eConf"
  98. CreateShortCut "$SMPROGRAMS\eConf\Start eConf.lnk" "$INSTDIR\bin\econf.bat"
  99. CreateShortCut "$SMPROGRAMS\eConf\README.lnk" "$INSTDIR\README.txt"
  100. CreateShortCut "$SMPROGRAMS\eConf\View the producer configuration.lnk" "$INSTDIR\conf\econf-sessions.xml"
  101. CreateShortCut "$SMPROGRAMS\eConf\Edit eConf properties.lnk" "notepad" $INSTDIR\conf\econf.props
  102. CreateShortCut "$SMPROGRAMS\eConf\Uninstall eConf.lnk" "$INSTDIR\uninst.exe"
  103. SectionEnd ;
  105. ; -------------------- DOCUMENTATION --------------------------
  107. Section "Documentation"
  108. SectionIn 1
  109. SetOutPath $INSTDIR
  110. ; /doc directory
  111. File /r "c:\release\eConf\doc"
  112. SectionEnd ;
  115. ; ----- UNINSTALL SECTION -----
  117. UninstallText "This will uninstall eConf v${VER_MAJOR}.${VER_MINOR} from your system"
  118. Section Uninstall
  119. SetOutPath $INSTDIR
  121. ; Removing files
  122. RMDir /r "$INSTDIR\bin"
  123. RMDir /r "$INSTDIR\conf"
  124. RMDir /r "$INSTDIR\lib"
  125. RMDir /r "$INSTDIR\logs"
  126. RMDir /r "$INSTDIR\doc"
  127. RMDir /r "$INSTDIR\proxy"
  128. RMDir /r "$INSTDIR\player"
  129. Delete "$INSTDIR\uninst.exe"
  130. Delete "$INSTDIR\README.txt"
  132. ; Removing registry keys
  133. DeleteRegKey HKEY_LOCAL_MACHINE "SOFTWARE\Infonet\eConf"
  134. DeleteRegKey HKEY_LOCAL_MACHINE "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\eConf"
  135. Push "$INSTDIR\bin\"
  136. Call un.RemoveFromPath
  137. Push "$INSTDIR\lib\econf.jar;$INSTDIR\lib\FTPProtocol.jar;$INSTDIR\lib\activation.jar;$INSTDIR\lib\mail.jar;$INSTDIR\lib\smtp.jar;$INSTDIR\lib\xerces.jar;$INSTDIR\proxy\classes\jigsaw.zip"
  138. Call un.RemoveFromClassPath
  139. DeleteRegValue HKCU "Environment" "ECONF_HOME"
  141. ; Removing eConf directory
  142. ;IfFileExists "$INSTDIR" 0 NoErrorMsg
  143. ;MessageBox MB_OK "Note: $INSTDIR could not be removed! You may remove files manually" IDOK 0 ; skipped if file doesn't exist
  144. ;NoErrorMsg:
  145. RMDir "$INSTDIR"
  147. ; Removing program file shortcut
  148. RMDir /r "$SMPROGRAMS\eConf"
  149. SectionEnd ; end of uninstall section
  151. ; ----- Functions -----
  153. ;called when the install was successful
  154. Function .onInstSuccess
  155. MessageBox MB_OK "eConf installer will now configure eConf"
  156. ExecWait 'java -classpath "$INSTDIR\lib\econf.jar" be.ac.fundp.infonet.econf.installer.Install "$INSTDIR"'
  157. MessageBox MB_OK "Installation complete!"
  158. Call IsNT
  159. Pop $1
  160. StrCmp $1 1 No_Reboot
  161. MessageBox MB_YESNO "Before using eConf you must reboot your computer. Reboot now?" IDNO No_Reboot
  162. Reboot
  163. No_Reboot:
  164. FunctionEnd
  166. ;called when the user hits the 'cancel' button
  167. Function .onUserAbort
  168. MessageBox MB_YESNO "Abort install?" IDYES NoCancelAbort
  169. Abort
  170. NoCancelAbort:
  171. FunctionEnd
  173. ;called when the installer is nearly finished initializing
  174. Function .onInit
  175. # [show splash screen]
  176. SetOutPath $TEMP
  177. File /oname=spltmp.bmp "c:\release\installer\infonet.bmp"
  178. File /oname=spltmp.exe "C:\e-learning\release\NSIS\splash.exe"
  179. ExecWait '"$TEMP\spltmp.exe" 2000 $HWNDPARENT $TEMP\spltmp'
  180. Delete $TEMP\spltmp.exe
  181. Delete $TEMP\spltmp.bmp
  183. StrCpy $0 $WINDIR 2
  184. ; Now $0 is the system drive
  185. StrCpy $INSTDIR "$0\eConf"
  186. ; this is to set the default install dir
  187. ; to the right choice.
  188. FunctionEnd
  191. ; ************************
  192. ; ** INTERNAL FUNCTIONS **
  193. ; ************************
  195. ;====================================================
  196. ; IsNT - Returns 1 if the current system is NT, 0
  197. ;        otherwise.
  198. ;     Output: head of the stack
  199. ;====================================================
  200. Function IsNT
  201. Push $0
  202. ReadRegStr $0 HKLM "SOFTWARE\Microsoft\Windows NT\CurrentVersion" CurrentVersion
  203. StrCmp $0 "" 0 IsNT_yes
  204. ; we are not NT.
  205. Pop $0
  206. Push 0
  207. Goto IsNT_done
  209. IsNT_yes:
  210.  ; NT!!!
  211.  Pop $0
  212.  Push 1
  214. IsNT_done:
  215. FunctionEnd
  217. ;====================================================
  218. ; AddToPath - Adds the given dir to the search path.
  219. ;        Input - head of the stack
  220. ;        Note - Win9x systems requires reboot
  221. ;====================================================
  222. Function AddToPath
  223. Exch $0
  224. Push $1
  226. Call IsNT
  227. Pop $1
  228. StrCmp $1 1 AddToPath_NT
  229.  ; Not on NT
  230.  StrCpy $1 $WINDIR 2
  231.  FileOpen $1 "$1\autoexec.bat" a
  232.  FileSeek $1 0 END
  233.  GetFullPathName /SHORT $0 $0
  234.  FileWrite $1 "$\nSET PATH=%PATH%;$0$\n"
  235.  FileClose $1
  236.  Goto AddToPath_done
  238. AddToPath_NT:
  239.  ReadRegStr $1 HKCU "Environment" "PATH"
  240.  StrCmp $1 "" AddToPath_NTwasEmpty
  241.   StrCpy $0 "$1;$0"
  242.   Goto AddToPath_NTdoIt
  243.  AddToPath_NTwasEmpty:
  244.   StrCpy $1 $0
  245.  AddToPath_NTdoIt:
  246.   WriteRegStr HKCU "Environment" "PATH" $0
  247.   Push $OUTDIR
  248.   SetOutPath $TEMP
  249.   File "c:\release\installer\RefreshEnv\Release\RefreshEnv.exe"
  250.   Exec "$TEMP\RefreshEnv.exe"
  251.   Delete "$TEMP\RefreshEnv.exe"
  252.   Pop $OUTDIR
  254. AddToPath_done:
  255.  Pop $1
  256.  Pop $0
  257. FunctionEnd
  260. ;====================================================
  261. ; AddToClassPath - Adds the given dir to the classpath.
  262. ;        Input - head of the stack
  263. ;        Note - Win9x systems requires reboot
  264. ;====================================================
  265. Function AddToClassPath
  266. Exch $0
  267. Push $1
  269. Call IsNT
  270. Pop $1
  271. StrCmp $1 1 AddToClassPath_NT
  272.  ; Not on NT
  273.  StrCpy $1 $WINDIR 2
  274.  FileOpen $1 "$1\autoexec.bat" a
  275.  FileSeek $1 0 END
  276.  GetFullPathName /SHORT $0 $0
  277.  FileWrite $1 "$\nSET CLASSPATH=%CLASSPATH%;$0$\n"
  278.  FileClose $1
  279.  Goto AddToClassPath_done
  281. AddToClassPath_NT:
  282.  ReadRegStr $1 HKCU "Environment" "classpath"
  283.  StrCmp $1 "" AddToClassPath_NTwasEmpty
  284.   StrCpy $0 "$0;$1"
  285.   Goto AddToClassPath_NTdoIt
  286.  AddToClassPath_NTwasEmpty:
  287.   StrCpy $1 $0
  288.  AddToClassPath_NTdoIt:
  289.   WriteRegStr HKCU "Environment" "classpath" $0
  290.   Push $OUTDIR
  291.   SetOutPath $TEMP
  292.   File "c:\release\installer\RefreshEnv\Release\RefreshEnv.exe"
  293.   Exec "$TEMP\RefreshEnv.exe"
  294.   Delete "$TEMP\RefreshEnv.exe"
  295.   Pop $OUTDIR
  297. AddToClassPath_done:
  298.  Pop $1
  299.  Pop $0
  300. FunctionEnd
  302. ;====================================================
  303. ; CreateEnvVar - Create a new Environment variable
  304. ;        Input - head of the stack (Environment attribute and name)
  305. ;        Note - Win9x systems requires reboot
  306. ;====================================================
  307. Function CreateEnvVar
  309. Push $0
  310. Exch
  311. Pop $0 ; $0 Environment attribute Value
  312. Push $1
  313. Exch 2
  314. Pop $1 ; $1 Environment attribute name
  315. Exch
  316. Push $2
  318. Call IsNT
  319. Pop $2
  320. StrCmp $2 1 createEnvVar_NT
  321.  ; Not on NT
  322.  StrCpy $2 $WINDIR 2
  323.  FileOpen $2 "$1\autoexec.bat" a
  324.  FileSeek $2 0 END
  325.  GetFullPathName /SHORT $0 $0
  326.  FileWrite $2 "$\nSET $1=$0$\n"
  327.  FileClose $2
  328.  Goto createEnvVar_done
  330. createEnvVar_NT:
  331.  WriteRegStr HKCU "Environment" "$1" $0
  332.  Push $OUTDIR
  333.  SetOutPath $TEMP
  334.  File "c:\release\installer\RefreshEnv\Release\RefreshEnv.exe"
  335.  Exec "$TEMP\RefreshEnv.exe"
  336.  Delete "$TEMP\RefreshEnv.exe"
  337.  Pop $OUTDIR
  339. createEnvVar_done:
  340.  Exch $2
  341.  Exch 2
  342.  Pop $0
  343.  Pop $1
  344.  Pop $1
  345.  Pop $0
  346. FunctionEnd
  348. ;====================================================
  349. ; RemoveFromPath - Remove a given dir from the path
  350. ;     Input: head of the stack
  351. ;====================================================
  352. Function un.RemoveFromPath
  353. Exch $0
  354. Push $1
  355. Push $2
  356. Push $3
  358. Call un.IsNT
  359. Pop $1
  360. StrCmp $1 1 RemoveFromPath_NT
  361.  ; Not on NT
  362.  StrCpy $1 $WINDIR 2
  363.  FileOpen $1 "$1\autoexec.bat" r
  364.  FileOpen $2 "$TEMP\~~AUTOEX.TMP" w
  365.  GetFullPathName /SHORT $0 $0
  366.  StrCpy $0 "SET PATH=%PATH%;$0"
  367.  StrCpy $9 "PATH"
  368.  ;SetRebootFlag 1
  369.  Goto RemoveFromPath_dosLoop
  371.  RemoveFromPath_dosLoopSetRebootAndContinue:
  372.   StrCpy $9 "PATH"
  373.  RemoveFromPath_dosLoop:
  374.   FileRead $1 $3
  375.   StrCmp $3 $0 RemoveFromPath_dosLoopSetRebootAndContinue
  376.   StrCmp $3 "$0$\n" RemoveFromPath_dosLoopSetRebootAndContinue
  377.   StrCmp $3 "" RemoveFromPath_dosLoopEnd
  378.   FileWrite $2 $3
  379.   Goto RemoveFromPath_dosLoop
  381.  RemoveFromPath_dosLoopEnd:
  382.   FileClose $2
  383.   FileClose $1
  384.   StrCpy $1 $WINDIR 2
  385.   Delete "$1\autoexec.bat"
  386.   CopyFiles /SILENT "$TEMP\~~AUTOEX.TMP" "$1\autoexec.bat"
  387.   Delete "$TEMP\~~AUTOEX.TMP"
  388.   Goto RemoveFromPath_done
  390. RemoveFromPath_NT:
  391.  StrLen $2 $0
  392.  ReadRegStr $1 HKCU "Environment" "PATH"
  393.  Push $1
  394.  Push $0
  395.  Call un.StrStr ; Find $0 in $1
  396.  Pop $0 ; pos of our dir
  397.  IntCmp $0 -1 RemoveFromPath_done
  398.   ; else, it is in path
  399.   StrCpy $3 $1 $0 ; $3 now has the part of the path before our dir
  400.   IntOp $2 $2 + $0 ; $2 now contains the pos after our dir in the path (';')
  401.   IntOp $2 $2 + 1 ; $2 now containts the pos after our dir and the semicolon.
  402.   StrLen $0 $1
  403.   StrCpy $1 $1 $0 $2
  404.   StrCpy $3 "$3$1"
  406.   WriteRegStr HKCU "Environment" "PATH" $3
  407.   Push $OUTDIR
  408.   SetOutPath $TEMP
  409.   File "c:\release\installer\RefreshEnv\Release\RefreshEnv.exe"
  410.   Exec "$TEMP\RefreshEnv.exe"
  411.   Delete "$TEMP\RefreshEnv.exe"
  412.   Pop $OUTDIR
  414. RemoveFromPath_done:
  415.  Pop $3
  416.  Pop $2
  417.  Pop $1
  418.  Pop $0
  419. FunctionEnd
  421. ;====================================================
  422. ; RemoveFromClassPath - Remove a given dir from the  class path
  423. ;     Input: head of the stack
  424. ;====================================================
  425. Function un.RemoveFromClassPath
  426. Exch $0
  427. Push $1
  428. Push $2
  429. Push $3
  431. Call un.IsNT
  432. Pop $1
  433. StrCmp $1 1 RemoveFromClassPath_NT
  434.  ; Not on NT
  435.  StrCpy $1 $WINDIR 2
  436.  FileOpen $1 "$1\autoexec.bat" r
  437.  FileOpen $2 "$TEMP\~~AUTOEX.TMP" w
  438.  GetFullPathName /SHORT $0 $0
  439.  StrCpy $0 "SET CLASSPATH=%CLASSPATH%;$0"
  440.  StrCpy $9 "CLASSPATH"
  441.  ;SetRebootFlag 1
  442.  Goto RemoveFromClassPath_dosLoop
  444.  RemoveFromClassPath_dosLoopSetRebootAndContinue:
  445.   StrCpy $9 "CLASSPATH"
  446.  RemoveFromClassPath_dosLoop:
  447.   FileRead $1 $3
  448.   StrCmp $3 $0 RemoveFromClassPath_dosLoopSetRebootAndContinue
  449.   StrCmp $3 "$0$\n" RemoveFromClassPath_dosLoopSetRebootAndContinue
  450.   StrCmp $3 "" RemoveFromClassPath_dosLoopEnd
  451.   FileWrite $2 $3
  452.   Goto RemoveFromClassPath_dosLoop
  454.  RemoveFromClassPath_dosLoopEnd:
  455.   FileClose $2
  456.   FileClose $1
  457.   StrCpy $1 $WINDIR 2
  458.   Delete "$1\autoexec.bat"
  459.   CopyFiles /SILENT "$TEMP\~~AUTOEX.TMP" "$1\autoexec.bat"
  460.   Delete "$TEMP\~~AUTOEX.TMP"
  461.   Goto RemoveFromClassPath_done
  463. RemoveFromClassPath_NT:
  464.  StrLen $2 $0
  465.  ReadRegStr $1 HKCU "Environment" "classpath"
  466.  Push $1
  467.  Push $0
  468.  Call un.StrStr ; Find $0 in $1
  469.  Pop $0 ; pos of our dir
  470.  IntCmp $0 -1 RemoveFromClassPath_done
  471.   ; else, it is in path
  472.   StrCpy $3 $1 $0 ; $3 now has the part of the path before our dir
  473.   IntOp $2 $2 + $0 ; $2 now contains the pos after our dir in the path (';')
  474.   IntOp $2 $2 + 1 ; $2 now containts the pos after our dir and the semicolon.
  475.   StrLen $0 $1
  476.   StrCpy $1 $1 $0 $2
  477.   StrCpy $3 "$3$1"
  479.   WriteRegStr HKCU "Environment" "classpath" $3
  480.   Push $OUTDIR
  481.   SetOutPath $TEMP
  482.   File "c:\release\installer\RefreshEnv\Release\RefreshEnv.exe"
  483.   Exec "$TEMP\RefreshEnv.exe"
  484.   Delete "$TEMP\RefreshEnv.exe"
  485.   Pop $OUTDIR
  487. RemoveFromClassPath_done:
  488.  Pop $3
  489.  Pop $2
  490.  Pop $1
  491.  Pop $0
  492. FunctionEnd
  494. ;====================================================
  495. ; StrStr - Finds a given string in another given string.
  496. ;               Returns -1 if not found and the pos if found.
  497. ;          Input: head of the stack - string to find
  498. ;                      second in the stack - string to find in
  499. ;          Output: head of the stack
  500. ;====================================================
  501. Function un.StrStr
  502. Push $0
  503. Exch
  504. Pop $0 ; $0 now have the string to find
  505. Push $1
  506. Exch 2
  507. Pop $1 ; $1 now have the string to find in
  508. Exch
  509. Push $2
  510. Push $3
  511. Push $4
  512. Push $5
  514. StrCpy $2 -1
  515. StrLen $3 $0
  516. StrLen $4 $1
  517. IntOp $4 $4 - $3
  519. StrStr_loop:
  520.  IntOp $2 $2 + 1
  521.  IntCmp $2 $4 0 0 StrStrReturn_notFound
  522.  StrCpy $5 $1 $3 $2
  523.  StrCmp $5 $0 StrStr_done StrStr_loop
  525. StrStrReturn_notFound:
  526.  StrCpy $2 -1
  528. StrStr_done:
  529.  Pop $5
  530.  Pop $4
  531.  Pop $3
  532.  Exch $2
  533.  Exch 2
  534.  Pop $0
  535.  Pop $1
  536. FunctionEnd
  539. ; eof
  541. ;====================================================
  542. ; IsNT - Returns 1 if the current system is NT, 0
  543. ;        otherwise.
  544. ;     Output: head of the stack
  545. ;====================================================
  546. Function un.IsNT
  547. Push $0
  548. ReadRegStr $0 HKLM "SOFTWARE\Microsoft\Windows NT\CurrentVersion" CurrentVersion
  549. StrCmp $0 "" 0 IsNT_yes
  550. ; we are not NT.
  551. Pop $0
  552. Push 0
  553. Goto IsNT_done
  555. IsNT_yes:
  556.  ; NT!!!
  557.  Pop $0
  558.  Push 1
  560. IsNT_done:
  561. FunctionEnd


 
Voilà. Je précise que les fonctions de la fin ne sont pas de moi mais d'un gars très sympas sur le forum de nullsoft installer. Il n'y a pas son nom dans son code donc je l'ai laissé tel quel et il n'y a pas de license particulière sur son code.
 
Ceci étant dit, si tu as des questions intelligentes te gene pas.


---------------
Just because you feel good does not make you right
Reply

Marsh Posté le 05-08-2002 à 12:08:14    

bruno5678 a écrit a écrit :

nullsoft installer c ca qu il me faut  
par contre la syntaxe du script est pas top clair (c de l anglais...) si tu avais un exemple concret ca m aiderai vachement.
je me replonge la dedans merci encore daklord
 
euh greg je vois pas en koi les .bat va lancer l appli au demarrage ????



je fais du mauvais esprit si je veux
 
sinon, ANT c cool aussi :)

Reply

Marsh Posté le 05-08-2002 à 12:13:57    

je confirme que ant est cool mais à nouveau c'est bon en intranet ou dans un environnement connu.  
 
Vas t'en dire à tes users newbien d'installer ant :)
 
c'est sur que ca va le faire :p
 
et arrete de me provoquer ;)
 
  [:xp1700]


---------------
Just because you feel good does not make you right
Reply

Marsh Posté le 05-08-2002 à 12:15:17    

DarkLord a écrit a écrit :

je confirme que ant est cool mais à nouveau c'est bon en intranet ou dans un environnement connu.  
 
Vas t'en dire à tes users newbien d'installer ant :)
 
c'est sur que ca va le faire :p
 
et arrete de me provoquer ;)
 
  [:xp1700]  



bah si tes scripts sont bien écrits, oui ça va le faire.
j'en veux pour preuve que n&j ont installé certains trucs sans problemes... :D

Reply

Marsh Posté le 05-08-2002 à 13:36:03    

merci pour ton exemple et ton coup de pouce .
bruno ;-}

Reply

Marsh Posté le 05-08-2002 à 13:36:26    

enfin tes coup de pouces

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed