Leaked source code of windows server 2003
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

55 lines
1.3 KiB

'
' Enums for IMPCUploadJob.Mode
'
Const UL_MODE_BACKGROUND = &H0
Const UL_MODE_FOREGROUND = &H1
'stop
Set oArguments = wscript.Arguments
If oArguments.length > 0 then
Id = oArguments.Item(0)
End If
History = 0
Compressed = false
PersistToDisk = true
If oArguments.length > 1 then
History = CInt(oArguments.Item(1))
End If
If oArguments.length > 2 then
Compressed = CBool(oArguments.Item(2))
End If
If oArguments.length > 3 then
PersistToDisk = CBool(oArguments.Item(3))
End If
Set obj = CreateObject( "UploadManager.MPCUpload" )
Set job = obj.CreateJob()
job.Sig = "{2B12E858-F61B-11d2-938E-00C04F72DAF7}"
'job.Server = "http://localhost/pchealth/uploadserver.dll"
'job.Server = "http://pchts1/pchealth_esc/uploadserver.dll"
'job.Server = "http://beta.mspchealth.com/pchealth_esc/UpLoadServer.dll"
job.Server = "http://dmassare2/pchealth/uploadserver.dll"
'job.Server = "http://131.107.161.55/pchealth_esc/UpLoadServer.dll"
job.ProviderID = "Esc"
job.Mode = UL_MODE_BACKGROUND
job.Mode = UL_MODE_FOREGROUND
job.History = History
job.Compressed = Compressed
job.PersistToDisk = PersistToDisk
'job.UserName = "davide&"
'job.Password = "Test +"
If Id <> "" Then
job.JobID = ID
End If
wscript.echo job.JobID