[vbscript] inlezen wegschrijven naar profile variable

[@r!k]

Goedemorgen medetweakertjes.

Ik heb onderstaand script gekopieerd / aangepast en ben al redelijk ver, er is echter 1 ding waar ik niet uitkom.

code:

'Script for updating Outlook Profile to change the Exchange server.
Set objFSO = CreateObject("Scripting.FileSystemObject")
set shell = WScript.CreateObject( "WScript.Shell" )
set wsh = createobject("WScript.Shell")
username = shell.ExpandEnvironmentStrings("%USERNAME%")
profile = wsh.ExpandEnvironmentStrings("%UserProfile%")
strfile =  & profile &\ & username & ".log"


If objFSO.FileExists(strfile) then
    WScript.quit
Else

Wscript.Sleep 4000

shell.Run "C:\Progra~1\Micros~1\Office10\OUTLOOK.EXE /importprf \\network.lan\netlogon\outlook.prf"

'creates a logfile and prints to it some info
    
shell.Run "cmd /c echo %username% - %time% - %date% - %computername% OUTLOOK PROFILE UPDATED!>> %userprofile%\%username%.log"
End If

Ik krijg dan de volgende foutmelding.

Line: 7
Char: 12
Error: Syntax Error
Code: 800A03EA

Ik heb echter geen idee wat ik fout doe, ik snap dat de fout zich uiteraard op lijn 7 karakter 12 bevindt maar dat is het & teken. Heb ik de variable verkeerd gedefinieerd? En hoe zou het anders moeten dan?

[RobIII]

VBScript:

strfile =  & profile &\ & username

Daar zit je fout (overduidelijk) en als je de basics onder de knie had gehad had je dit zelf ook gezien. Het & teken is voor concatenatie van strings en zal dus 2 operators (links en rechts ervan) willen hebben en de linker mist voor de eerste ampersand. Ik zie dan ook het hele nut van het &-teken niet in die regel. Verder missen quotes om de slash...

Van knippen en plakken van het web leer je niets en wij zijn hier niet om fouten voor jou in "geleende" scripts te gaan zitten oplossen (zie ook quickfix). Mail voor support de maker Of zorg dat je de basics onder de knie hebt; dan pik je er dit soort zaken zelf makkelijk uit en kun je gerichte (en 'zinnigere') vragen stellen

[ Voor 56% gewijzigd door RobIII op 20-05-2009 09:40 ]