8 svar · 212 visningar · startad av H_E_Pennypacker
Ser ni nåt konstigt i denna koden?
Allting går igenom, får inga felmeddelanden, men ingenting händer i databasen.
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="../Connections/barbarnes_test_domain.asp" -->
<%
finfo = Request.Form("info")
set uppdatera_info = Server.CreateObject("ADODB.Recordset")
uppdatera_info.ActiveConnection = MM_barbarnes_test_domain_STRING
uppdatera_info.Source = "INSERT INTO info (Info,Datum) VALUES ("finfo","Date()",);"
%>
samma sak, ingentin uppdateras
Det saknas ett execute och sen så ser din insert felaktig ut
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="../Connections/barbarnes_test_domain.asp" -->
<%
set conn = server.createobject("adodb.connection")
conn.open MM_barbarnes_test_domain_STRING
finfo = Request.Form("info")
sql = "insert into info(info,datum) " &_
" values ('" & finfo & "',date)"
conn.execute sql,,128
conn.close
set conn = nothing
Nu förutsätter jag att du använder access, annars så får du byta ut date till något annat.
Jag skapar också ett connectionobjekt explicit, det är lika bra att göra det för annars så skapas det implicit.
Med den koden:
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="../Connections/barbarnes_test_domain.asp" -->
<%
set conn = server.createobject("adodb.connection")
conn.open MM_barbarnes_test_domain_STRING
finfo = Request.Form("info")
sql = "insert into info(info,datum) " &_
" values ('" & finfo & "',date)"
conn.execute sql,,128
conn.close
set conn = nothing
Får jag felmeddelandet:
Microsoft OLE DB Provider for ODBC Drivers error '80040e10'
[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.
/barbarnes/admin/info.asp, line 10
Nu börjar det hända lite, du får ju i alla fall kontakt med databasen.
Det kanske går bättre med
sql = "insert into info(info,datum) " &_
" values ('" & finfo & "',#" & _
date & "#)"
conn.execute sql,,128
konstigt
<%@LANGUAGE="VBSCRIPT"%>
<%
MM_barbarnes_test_domain_STRING = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("/barbarnes/database/drinkar.mdb")
set conn = server.createobject("adodb.connection")
conn.open MM_barbarnes_test_domain_STRING
finfo = Request.Form("info")
sql = "insert into info(info,datum) " &_
" values ('" & finfo & "',#" & _
date & "#)"
conn.execute sql,,128
conn.close
set conn = nothing
%>
Ger felmeddelandet:
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified
/barbarnes/admin/info.asp, line 5
funkar nu, tack
sökvägen till databasen?
