proggi: Inhalte eines Testfiles in eine ACCESS - DB wegschreiben

Beitrag lesen

Hallo Leute,

da mein erster Thread - "zugegebenerweise" - zu diessem Thema einfach zu ungenau war, möchte ich meine Frage an euch etwas präzisieren:

Ich versuche mit dem folgenden "Code - Snippet" eine bereits existierende txt-Datei zeilenweise auszulesen und den Inhalt dieses Textstreams in eine ACCESS - DB (Tabelle "inbox" in das Feld "Body" Typ: Memo) wegzuschreiben...hier der Code:

'Erzeugen eines FSO Objektes für das Auslesen einer Textdatei
'************************************************************

Set objFSO=Server.CreateObject("Scripting.FileSystemObject")
 Set objStream=objFSO.OpenTextFile("D:\dev\progtest\email.txt", 1, True)

'Erzeugung der Datenbankverbindung
'*********************************

dbPath = "d:\dev\progtest\mail.mdb"
   Set Conn = Server.CreateObject("ADODB.Connection")
  Conn.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & dbPath

'Zeilenweise auslesen und wegschreiben
'*************************************

DO while not objStream.AtEndOfStream

strLineText=objSTream.ReadLine

Set rs = Server.CreateObject("ADODB.recordset")
    rs.open "insert into inbox (Body) values (strLineText)",Conn

Loop

Nach der Ausführung dieser Zeilen bekomme ich folgende Fehlermeldung:

Kompilierungsfehler in Microsoft VBScript- Fehler '800a03ea'

Syntaxfehler

/iisHelp/common/500-100.asp, line 129

elseIf (objASPError.Description > "") Then
^
Microsoft JET Database Engine- Fehler '80040e10'

Für mindestens einen erforderlichen Parameter wurde kein Wert angegeben

Was mache ich falsch?

Danke im Voraus...Gruß proggi