2017-07-10 48 views
1

我想通過Excel VBA自動化以下過程: 1.打開膩子特定路徑 2.使用憑據登錄 3.導航到服務器中的路徑。 (cd/folder1/folder2) 我可以做1 & 2.由於我是VBA新手,我不知道如何實現第三。通過VBExcel自動化膩子

+1

你試過'Sendkeys'嗎?也許如果你發佈前兩步的代碼,幫助會更容易。 –

+0

'CHDIR 「C:\ folder1中\文件夾2」' – braX

+0

公用Sub測試() 昏暗PuttyPID爲Long 昏暗的用戶名作爲字符串 昏暗密碼作爲字符串 用戶名= 「XXXXXX」 密碼= 「123456」 P1 =「C:\ Program Files(x86)\ PuTTy \ putty.exe - ssh」&username&「@ xx.yyy.zzz.aaa - pw」&Password PuttyPID = Shell(pc1,1) –

回答

0
Public Sub Test() 
    Dim PuttyPID as Long, username as String, password as String 
    username= " xxxxxx": Password= "123456" 
    P1 = "C:\Program Files (x86)\PuTTy\putty.exe - ssh" & username & _ 
    "@xx.yyy.zzz.aaa - pw" & Password 
    PuttyPID = Shell(P1, 1) 

    ''''''''''''''''''''''''''''''''''''''''''' 
    Application.Wait Now + TimeSerial(0, 0, 20) ' <-- give it time to get server prompt 
    AppActivate PuttyPID ' <-- activate it again to make sure 
    SendKeys "cd /folder1/folder2" & vbCr ' <-- vbCR to simulate CR key 
End Sub 
+1

感謝ASHIt工作:) –

+0

除了上面的代碼..我插入下面的命令列出包含特定文本(例如:abc)的日誌: SendKeys「grep -il abc * .log」 是否有任何方法可以修改代碼以從用戶處取得「abc」值而不是在代碼中提供它? –

+0

議程是列出folder2中包含「abc」文本的所有文件 –