black-dog
Erfahrenes Mitglied
das ist mein code:
--------------------------------------------------------------------
Dim ThemaName, TitelName, URLName, BeschreibungName, SpracheName
ThemaName = "Rettung"
TitelName = request.form("TitelForm")
URLName = request.form("URLForm")
BeschreibungName = request.form("BeschreibungForm")
SpracheName = request.form("SpracheForm")
SET con = Server.CreateObject("ADODB.Connection")
con.OPEN "DSN=Links"
Set rs = Server.CreateObject("ADODB.RecordSet")
Query = "SELECT * FROM tbl_Resultate"
--------------------------------------------------------------------
in folgender zeile soll der fehler liegen
--------------------------------------------------------------------
rs.Open Query, Con, adOpenDynamic, adLockOptimistic
rs.AddNew
rs("Titel") = response.write(TitelName)
rs("URL") = response.write(URLName)
rs("Beschreibung") = response.write(BeschreibungName)
rs("Sprache") = response.write(SpracheName)
rs("Thema") = response.write(ThemaName)
rs.Update
rs.Close
--------------------------------------------------------------------
das ist die fehlermeldung
--------------------------------------------------------------------
Die Argumente sind vom falschen Typ, liegen außerhalb des Gültigkeitsbereiches oder sind miteinander unvereinbar.
--------------------------------------------------------------------
sehr ihr nen fehler? ich werd leider nicht schlau daraus, alle variablen sind belegt (mit text) und in der datenbank sind alles textfelder.
--------------------------------------------------------------------
Dim ThemaName, TitelName, URLName, BeschreibungName, SpracheName
ThemaName = "Rettung"
TitelName = request.form("TitelForm")
URLName = request.form("URLForm")
BeschreibungName = request.form("BeschreibungForm")
SpracheName = request.form("SpracheForm")
SET con = Server.CreateObject("ADODB.Connection")
con.OPEN "DSN=Links"
Set rs = Server.CreateObject("ADODB.RecordSet")
Query = "SELECT * FROM tbl_Resultate"
--------------------------------------------------------------------
in folgender zeile soll der fehler liegen
--------------------------------------------------------------------
rs.Open Query, Con, adOpenDynamic, adLockOptimistic
rs.AddNew
rs("Titel") = response.write(TitelName)
rs("URL") = response.write(URLName)
rs("Beschreibung") = response.write(BeschreibungName)
rs("Sprache") = response.write(SpracheName)
rs("Thema") = response.write(ThemaName)
rs.Update
rs.Close
--------------------------------------------------------------------
das ist die fehlermeldung
--------------------------------------------------------------------
Die Argumente sind vom falschen Typ, liegen außerhalb des Gültigkeitsbereiches oder sind miteinander unvereinbar.
--------------------------------------------------------------------
sehr ihr nen fehler? ich werd leider nicht schlau daraus, alle variablen sind belegt (mit text) und in der datenbank sind alles textfelder.