Subversion Repositories DevTools

Rev

Rev 5506 | Rev 6698 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5506 Rev 6645
Line 324... Line 324...
324 
 
 324 
 
325 
    pkgCredentails = split(Application("PKGARCHIVE_CREDENTIALS"),":")
 325 
    pkgCredentails = split(Application("PKGARCHIVE_CREDENTIALS"),":")
326 
    uname = pkgCredentails(0)
 326 
    uname = pkgCredentails(0)
327 
    upasswd = pkgCredentails(1)
 327 
    upasswd = pkgCredentails(1)
328 
 
 328 
 
329 
    plinkPath = Request.ServerVariables("APPL_PHYSICAL_PATH") & "Release_Manager\scripts\bin\plink.exe"
 329 
    plinkPath = Server.MapPath("scripts\bin\plink.exe")
330 
    plinkCmd =  "-ssh -batch " & uname & "@" & archive_server & " -pw " & upasswd & " ""sudo " & Replace(sudoCmd,Chr(34),Chr(92)&Chr(34)) & ";"""
 330 
    plinkCmd =  "-ssh -batch " & uname & "@" & archive_server & " -pw " & upasswd & " ""sudo " & Replace(sudoCmd,Chr(34),Chr(92)&Chr(34)) & ";"""
331 
    wCmdLine =  plinkPath & " " & plinkCmd
 331 
    wCmdLine =  plinkPath & " " & plinkCmd
332 
 
 332 
 
333 
    Dim objWSH, rv
 333 
    Dim objWSH, rv
334 
    Set objWSH = Server.CreateObject("WScript.Shell")
 334 
    Set objWSH = Server.CreateObject("WScript.Shell")