Der folgende Beitrag wurde am 26. 06. 2007, 13:37 Uhr von Jenny veröffentlicht.
hi Leute,
undzwar hab ich folgendes Problem
ich will ein Programm im cmd ausführen um dann die werte auszulesen und in ein Textdokument zuschreiben und das ganze grafisch anzeigen lassen
hier ist mein anfang es scheitert nur am schreiben in die textdatei
________________________________________________________________
Private Sub Command1_Click()
Dim Pfad, PfadAusgabe, Auslesen() As String
Dim i, FNr, Ergebnisse As Integer
Dim blah As Variant
Ergebnisse = Combo1.ListIndex + 60
ReDim Auslesen(Ergebnisse)
Pfad = Dir1
For i = 1 To Len(Pfad) + 1 Step 1
If Mid(Pfad, i, 1) = "\" Then
Pfad = Left(Pfad, i - 1) & "/" & Mid(Pfad, i + 1, Len(Pfad) - (i - 1))
i = i + 1
End If
Next i
PfadAusgabe = App.Path & "\batch.bat"
If Dir(PfadAusgabe) > "" Then Kill PfadAusgabe
FNr = FreeFile
Open PfadAusgabe For Output As #FNr
' Print #FNr, "start accesschk.exe -r " & Pfad & " > Ausgabe.txt";
Print #FNr, "start cacls " & Pfad & " > Ausgabe.txt";
Close #FNr
----------------------- möglicher Fehler ---------------------------
blah = Shell(PfadAusgabe)
----------------------- möglicher Fehler ---------------------------
Open PfadAusgabe For Input As #FNr
For i = 0 To Ergebnisse Step 1
If Not EOF(FNr) Then
Line Input #FNr, Auslesen(i)
ElseIf EOF(FNr) Then
Exit Sub
End If
Next i
Close #FNr
End Sub
_________________________________________________________________
vielen dank im vorraus
Der folgende Beitrag wurde am 26. 06. 2007, 13:58 Uhr von Rouven veröffentlicht.
Hello,
> ich will ein Programm im cmd ausführen um dann die werte auszulesen und in ein Textdokument zuschreiben und das ganze grafisch anzeigen lassen
welche Werte? wo sind die? wer schreibt was wohin? Meines Wissens hast du keinen direkten Zugriff auf die Eingaben in der Shell (eigener Prozess).
Und ansonsten: definiere "scheitert"! Fehlermeldung? Hast du mal die Variablen im Einzelschritt nachvollzogen? Hast du die Fehlerbehandlung aktiviert?
MfG
Rouven
--
-------------------
Eine Bilanz ist wie der Bikini einer Frau. Sie zeigt fast alles, aber verdeckt das Wesentliche -- Günter Stotz, Regierungsdirektor des baden-württembergischen Wirtschaftsministeriums
Der folgende Beitrag wurde am 26. 06. 2007, 16:18 Uhr von Detlef G. veröffentlicht.
Hallo Jenny oder Dirk?
Auf wie viele verschiedene Threads soll sich dieses Problem denn noch verteilen?
Wir haben jetzt schon (SONSTIGES) accesschk und (SONSTIGES) Batch-Datei.
Auf Wiederlesen
Detlef
--
- Wissen ist gut
- Können ist besser
- aber das Beste und Interessanteste ist der Weg dahin!
© 1998-2013 SELFHTMLImpressumSoftware: Classic Forum 3.4