Subversion Repositories DevTools

Rev

Rev 5357 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5357 Rev 5375
Line 56... Line 56...
56 
Dim newPatchId
 56 
Dim newPatchId
57 
'------------ Constants Declaration -----------
 57 
'------------ Constants Declaration -----------
58 
'------------ Variable Init -------------------
 58 
'------------ Variable Init -------------------
59 
parPv_id = QStrPar("pv_id")
 59 
parPv_id = QStrPar("pv_id")
60 
strDriveLetter = "R:"
 60 
strDriveLetter = "R:"
61 
pkgCredentails = split(PKGARCHIVE_CREDENTIALS,":")
 61 
pkgCredentails = split(Application("PKGARCHIVE_CREDENTIALS"),":")
62 
strUser = pkgCredentails(0)
 62 
strUser = pkgCredentails(0)
63 
strPassword = pkgCredentails(1)
 63 
strPassword = pkgCredentails(1)
64 
strRemotePath = "\\" & Get_Archive_Server() & "\dpkg_archive"
 64 
strRemotePath = "\\" & Get_Archive_Server() & "\dpkg_archive"
65 
strProfile = "False" ' means do not store in profile leave as false.
 65 
strProfile = "False" ' means do not store in profile leave as false.
66 
AlreadyConnected = False
 66 
AlreadyConnected = False