Kod?
Provider error '80020005'
Type mismatch.
/uddcomb/admin/savenewad.asp, line 38
Tack på förhand!
// Dflex
16 svar · 250 visningar · startad av Dflex
Provider error '80020005'
Type mismatch.
/uddcomb/admin/savenewad.asp, line 38
Tack på förhand!
// Dflex
Kod?
Ja du...
Du får nog vara lite mer precisis...
tex, vad finns på rad 38, det skulle hjälpa ett par hekto. :)
Vad säger koden?
Här kommer koden!
Svar: ja
Vad försöker du skriva till innehåll?
<%
innehall=request.form("innehall")
Response.Write innehall
%>
OT: undvik att använda svenska bokstäver när du kodar i asp, sql eller dylikt...
Kontrollera så att värdena du försöker stoppa in är av rätt datatyp, så du inte försöker lägga in text i fält som är av taltyp, osv.
Dessutom, det är bättre om du klistrar in relevant kod här, det är omständigt att ladda hem, zippa upp och öppna en editor.
Mvh,
Vad händer om du byter till "Text"?
Testat det...men det blir samma felmeddelande!
Prova denna istället... Man vet ju aldrig...
SQLStr="INSERT tbl_Ritningar (format, ritningsnummer, revision, "
SQLStr = SQLStr & "ordernr, skapad_av, skapad, innehall, kund, projektnamn... osv)"
SQLStr = SQLStr & "VALUES('"&format&"','"&ritningsnummer&"','"&revision&"'...osv)"
'Response.Write SQLStr
Databas.Execute SQLStr
Ska jag ersätta din kod med alla rs("....")=......?
<%
SET Conn= Server.CreateObject("ADODB.Connection")
Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath(ritregister))
SET rs= Server.CreateObject("ADODB.Recordset")
sql="SELECT * FROM tbl_Ritningar where 1=2"
rs.open sql,conn,3,3
rs.addnew
rs("format")=format
rs("ritningsnr")=ritningsnummer
rs("revision")=revision
rs("ordernr")=ordernr
rs("skapad av")=skapadav
rs("skapad")=skapad
rs("innehåll")=innehall
rs("kund")=kund
rs("projektnamn")=projektnamn
rs("kundritningsnr")=kundritningsnummer
rs("filformat")=filformat
rs("sparad")=sparad
rs("arkiverad")=arkiverad
rs("kopians revision")=arkivrev
rs("säkerhet")=sakerhet
rs("filformat")=filformat
rs.update
rs.close
%>
Byt detta mot:
<%
SET Conn= Server.CreateObject("ADODB.Connection")
Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath(ritregister))
SQLStr="INSERT tbl_Ritningar (format, ritningsnummer, revision, "
SQLStr = SQLStr & "ordernr, skapad_av, skapad, innehall, kund, projektnamn... osv)"
SQLStr = SQLStr & "VALUES('"&format&"','"&ritningsnummer&"','"&revision&"'...osv)"
'Response.Write SQLStr
Conn.Execute SQLStr
Ungefär...
Ok..thank you!!!
Funkar det?