vbscript不工作，聲明錯誤結束或錯過）

即時通訊嘗試製作一個vbscript，它將列出dir中的所有內容，並通過每個文件讀取數據來操作和運行使用此數據作爲參數的powershell腳本。我發現以下開始，但它不起作用。有人可以幫忙嗎？vbscript不工作，聲明錯誤結束或錯過）

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
    ' make a reference to a directory 
    Dim di As New IO.DirectoryInfo("c:\") 
    Dim diar1 As IO.FileInfo() = di.GetFiles() 
    Dim dra As IO.FileInfo 

    'list the names of all files in the specified directory 
    For Each dra In diar1 
     ListBox1.Items.Add(dra) 
    Next 
End Sub

來源

2012-05-24 shorif2000

定義「不起作用」。 –

爲什麼不直接在Powershell中做所有事情？ – EBGreen

爲了什麼是值得的，你發佈的是VB.Net，而不是VBScript。 – EBGreen

的VBScript非常相似，VB，但它是一個很長一段時間，因爲我用VB最後一次......

AFAIR ListBox1.Items.Add（）預計和項目或一個字符串作爲參數，不是FileInfo對象嘗試使用 ListBox1.Items.Add（FileInfo.FullName）

來源

2012-05-24 16:49:42

對不起人。我認爲我用錯誤的語言編寫腳本。 – shorif2000

vbscript不工作，聲明錯誤結束或錯過）

回答

相關問題