Jump to content

Varibale als Dateiname nehmen und als txt abspeichern


Der letzte Beitrag zu diesem Thema ist mehr als 180 Tage alt. Bitte erstelle einen neuen Beitrag zu Deiner Anfrage!

Empfohlene Beiträge

Hallo zusammen,

 

ich habe ein vbscript mit dem div. Systeminformationen vom System ausgelesen werden (z.B. Hardwareinformationen, computername, osversion etc.) und in deine datei gespeichert wird. Ich bin mittlerweile soweit das als Dateiname der Computername (als Variable strComputername definiert) genommen wird. Dateiname müsste aber Computername.txt heißen.

 

so erstelle ich das File

 

Dim wikifile: Set wikifile = objFs.CreateTextFile(strDateiname,True)

 

hab da nen kleinen Codeschnipsel gefunden mit dem ich den Dateinamen ändern kann

 

Dim fso, objFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set objFile = fso.GetFile(strComputername) 
objFile.Name = test.txt

 

das funktioniert auch - es sollte ja aber Computername.txt heißen also strComputername.txt - wenn ich nun .txt hinzufüge wird natürlich die variable nicht mehr als variable erkannt und bringt nen fehler.

 

Wie kann ich doch .txt hinzufügen? Hat hier jemand eine Idee

 

Grüße Wolfgang

Link zu diesem Kommentar

das funktioniert auch - es sollte ja aber Computername.txt heißen also strComputername.txt - wenn ich nun .txt hinzufüge wird natürlich die variable nicht mehr als variable erkannt und bringt nen fehler.

 

Wie kann ich doch .txt hinzufügen? Hat hier jemand eine Idee

 

Dim fso, MyFile, strComputer
strComputer = "SPC"
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.CreateTextFile("c:\" & strComputer & ".txt", True)
MyFile.WriteLine("This is a test.")
MyFile.Close

Link zu diesem Kommentar
Der letzte Beitrag zu diesem Thema ist mehr als 180 Tage alt. Bitte erstelle einen neuen Beitrag zu Deiner Anfrage!

Schreibe einen Kommentar

Du kannst jetzt antworten und Dich später registrieren. Falls Du bereits ein Mitglied bist, logge Dich jetzt ein.

Gast
Auf dieses Thema antworten...

×   Du hast formatierten Text eingefügt.   Formatierung jetzt entfernen

  Only 75 emoji are allowed.

×   Dein Link wurde automatisch eingebettet.   Einbetten rückgängig machen und als Link darstellen

×   Dein vorheriger Inhalt wurde wiederhergestellt.   Editor-Fenster leeren

×   Du kannst Bilder nicht direkt einfügen. Lade Bilder hoch oder lade sie von einer URL.

×
×
  • Neu erstellen...