Von |
Günti |
eMail |
|
Am |
10. November 2009 um 12:55:17 |
Frage |
Hallo liebe Programmiergemeinde,
habe folgendes Problem. Ich möchte den Wert einer DriveList Box übergeben. Genauer gesagt würde ich gerne ein kleines Programm erstellen, bei dem ich den Wert , in dem Fall die Laufwerks auswahl mit dem CHKDSK Win-Befehl verknüpfen. Aktuel sieht das bei mir so aus, funzt aber nicht ganz. Kann mir jemand helfen ? Im voraus besten Dank ! ( eine Drivelist Box ist vorhanden )
Private Sub Command1_Click() On Error GoTo Err_Command1_Click
Dim stAppName As String
stAppName = ("Drive1.Drive" & "C:\WINDOWS\system32\chkdsk") Call Shell(stAppName, 1)
Exit_Command1_Click: Exit Sub
Err_Command1_Click: MsgBox ERR.Description Resume Exit_Command1_Click
End Sub |
|