#33678 - 2002-11-28 03:11 PM
WriteProfileString
|
BrianK
Getting the hang of it
Registered: 2002-10-02
Posts: 90
Loc: Amsterdam, The Netherlands
|
I'm having some trouble with a piece of script I made. I'm running Kix 4.12 on a XP client. The objective is that a local version.ini is crosschecked with a server version, for update purposes. code:
If Exist ("C:\Program Files\Network Associates\VirusScan\version.ini") ;Version.ini is in place Else $file = "c:\Program files\Network Associates\VirusScan\version.ini" $rc=WriteProfileString($file, "Config", "Version", 0) EndIf $availvers =readprofilestring("s:\stahlapps\vscan\config.451\version.ini","Config","Version") $currvers =readprofilestring("c:\program files\network associates\virusscan\version.ini","Config","Version") If $availvers > $currvers ; Shell "c:\program files\network associates\virusscan\msi_inst.exe /import s:\stahlapps\vscan\config.451\Stahl-XP.ini /restart" $rc=WriteProfileString($file, "Config", "Version",$availvers) ? "This is the available version: " + "$availvers" EndIf
Everything works fine, only the second writeprofilestring line doesn't work. The version.ini is not updated. The testline however is working fine and shows the correct available version.
Please advise.
Thanks in advance.
Brian
_________________________
Rodney Dangerfield:
“My mother didn't breast-feed me. She said she liked me as a friend.”
|
|
Top
|
|
|
|
Moderator: Jochen, Allen, Radimus, Glenn Barnas, ShaneEP, Ruud van Velsen, Arend_, Mart
|
0 registered
and 2220 anonymous users online.
|
|
|