Supportnet Computer
Planet of Tech

Supportnet / Forum / WindowsXP

Verbindung zur andere Tabelle VBScript





Frage

Guten Tag ich habe ein VBscript geschrieben, dass es von einer Tabelle aus zeile einliest, und möchte es in anderen Tabelle eingentlich in einer Datenbank hin schreiben. wie lautet der befehl. Datei wo ich einlese sieht so aus...> SNR100;119965 SNR110;119965_9;84494;10;29.12.2004 SNR111;4977729693133 SNR112;123456 SNR110;119965_10;83705;10;29.12.2004 SNR111;4977729663679 SNR112;1 SNR112;2 SNR112;3 SNR112;5 _________________________________ VBscript wo ich geschrieben haben................... Option Compare Database Option Explicit Function gaga() Dim Artiid, Hlieid, Serienr Dim Zeile As String Open "P:GlobalsetzSETZSACOM_TRLOG_SNR_1104339014765.csv" For Input As #1 ´ Datei öffnen Do While Not EOF(1) ´ Schleife bis Dateiende. Input #1, Zeile ´ Ein Zeile lesen. Select Case Left(Zeile, 6) Case "SNR100" ´LierferscheinNr ermitteln Hlieid = Right(Zeile, Len(Zeile) - InStr(Zeile, ";")) ´Zeile Recht aus bis zu der ; lesen Case "SNR110" ´ArikelNr nr ermitteln Artiid = Mid(Zeile, InStr(8, Zeile, ";") + 1, 5) ´ Mitte des Zeile nach 8 Zeichen bis zu ; + plus 1 dann bis zur 5 Zeichen lesen Case "SNR112" ´SerienNr ermitteln Serienr = Right(Zeile, Len(Zeile) - InStr(Zeile, ";")) ´Zeile Recht aus bis zu der ; lesen End Select Debug.Print Zeile ´ Ausgabe im Testfenster. Loop Close #1 ´ Datei schließen. End Function ___________________________________ Wie kann ich es auf einer anderen Tabelle verbinden und die Daten oder die Zeile wo ich lese, dort hin schreiben?? Wie lautet der Befehl??? Besten dank! Gruss Meera

Antwort von