webForumDet fria alternativet

ASP & Mysql

ASP

17 svar · 435 visningar · startad av ade

Medlem sedan juli 20041 081 inlägg
Frågan#1

Hejsan. Har gjort mitt första as script men jag har problem. (inte så konstigt kanske?!)

I alla fall får detta felmedlenade:

Microsoft OLE DB Provider for ODBC Drivers error '80040e37' 

[Microsoft][ODBC Microsoft Access Driver] Could not find output table 'inlagg'. 

/mapp/spara.asp, line 24

och på rad 24 står det:

Conn.Execute(SQL)

Det kan vara databasen det är fel på. För mitt access krånglar så jag tog en gb.mdb från en annan gästbok. Kan de va felet?

Medlem sedan feb. 200112 078 inlägg
#2

Tog du en ny databas från en annan gästbok utan att kolla hur databasen såg ut? Isåfall; har du kontrollerat ifall din nya gästboksdatabas överhuvudtaget innehåller en tabell som heter 'inlagg', eller om den ens har samma struktur som din nuvarande databas?

Medlem sedan juli 20041 081 inlägg
#3

Hur kan jag göra det utan access?

Medlem sedan feb. 200112 078 inlägg
#4

ade skrev:

Hur kan jag göra det utan access?

Ja, det gör du väl inte.

Det finns gratisscript att ladda ner för att administrera Access-filer, men jag vet inte om de är att rekommendera i det här fallet.

Jag undrar dessutom; du har skrivit mySQL i din rubrik. Var använder du mySQL?

Medlem sedan juli 20041 081 inlägg
#5

Jag ska få en access skiva ikväll..

adressen till databasen är http://www.bloody-mary.dk/mapp/gb.mdb

dessa inställningarna ska var databasen

ID Räknare, Premiärnyckel
namn Text
rubrik Text
medelande PM
datum Datum/Tid

Medlem sedan feb. 200112 078 inlägg
#6

Varsågod.

Jag stavade fältet 'medelande' med ett d med flit eftersom du skrev det så, om du nu har kod som beror på det. Jag döpte tabellen till 'inlagg'.

RED. Det heter 'Primärnyckel', inte 'Premiärnyckel', även om det sistnämnda hade varit mycket skojigare. ;)

Medlem sedan juli 20041 081 inlägg
#7

1000 tack.. ska testa

Medlem sedan juli 20041 081 inlägg
#8

fick detta felmedleande

Microsoft OLE DB Provider for ODBC Drivers error '80040e07' 

[Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression. 

/mapp/spara.asp, line 19

och en på aspsidan sa att jag skaulle testa detta

Conn.Execute SQL,,128

de var rad 19

Medlem sedan feb. 200112 078 inlägg
#9

Gör så. Välkommen tillbaka nästa gång med [kod]-taggar och en ordentlig rubrik.

MVH

Medlem sedan juli 20041 081 inlägg
#10
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<!--
Detta script är kodat av Mattias Karlsson på bloody-mary.dk!
Scriptet får andvändas fritt så länge denna text är kvar.
[url]http://www.bloody-mary.dk[/url] - Ett Steg inom webutvecklingen 
-->

<body>
<% Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("gb.mdb") & ";pwd=;"

SQL = "Insert Into Inlagg(namn,rubrik,medelande,datum) Values('" & Request.Form("namn") & "', '" & Request.Form("rubrik") & "', '" & Request.Form("medelande") & "', '" & Request.Form("datum") & "')"

Conn.Execute SQL,,128

Conn.Close
Set Conn = Nothing

Response.Redirect "gb.asp"  %>  

</body>
</html>

så ser hela ut

Medlem sedan feb. 200112 078 inlägg
#11
SQL = "Insert Into Inlagg(namn,rubrik,medelande,datum) Values('" & Request.Form("namn") & "', '" & Request.Form("rubrik") & "', '" & Request.Form("medelande") & "', #" & Request.Form("datum") & "#)"

Datumkolumner skall inneslutas i brädgårdar (#).

Medlem sedan juli 20041 081 inlägg
#12

Nu funkar det iallafall lite :)

Men inlägget kommer inte upp i gb.asp.

gb.asp ser su så här:


<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<!--
Detta script är kodat av Mattias Karlsson på bloody-mary.dk!
Scriptet får andvändas fritt så länge denna text är kvar.
[url]http://www.bloody-mary.dk[/url] - Ett Steg inom webutvecklingen 
-->
<body>
<a href=skriv.asp>Skriv ett inlägg</a><br><br>

<% Set Conn = Server.CreateObject("ADODB.Connection")
Set Rs = Server.CreateObject("ADODB.Recordset")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("gb.mdb") & ";pwd=;"

SQL = "Select * From inlagg Order By ID DESC"
Rs.Open SQL, Conn
Do While Not Rs.EOF
%> 

<table><tr><td width=400 bgcolor=0099ff><%Response.Write Rs("namn")%> | 
<%Response.Write Rs("rubrik")%></td></tr>
<tr><td width=400><%Response.Write Rs("medelande")%> <br><br> 

<%Response.Write Rs("datum")%>
</td></tr></table> 

<% Rs.MoveNext
Loop
Rs.Close
Conn.Close
Set Rs = Nothing
Set Conn = Nothing
%> 
</body>
</html>

och sista filen skriv.asp så här:

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<!--
Detta script är kodat av Mattias Karlsson på bloody-mary.dk!
Scriptet får andvändas fritt så länge denna text är kvar.
[url]http://www.bloody-mary.dk[/url] - Ett Steg inom webutvecklingen 
-->
<body>

<form action="spara.asp" method="post">

Namn<br>
<input type="text" name="namn"><br>
Rubrik<br>
<input type="text" name="rubrik"><br>
Medelande<br>
<textarea name="medelande" cols="30" rows="6"></textarea><br><br>

<input type="submit" value="skicka">

</form> 

</body>
</html>
Medlem sedan feb. 200112 078 inlägg
#13

Finns det något inlägg i databasen då? Det gjorde det iallafall inte när jag sparade ner den.

Medlem sedan juli 20041 081 inlägg
#14

aa sebastian.nu men mina inlägg som jag skriver sparas inte :(

Medlem sedan juli 20041 081 inlägg
Medlem sedan feb. 200112 078 inlägg
#16

Hur ser koden i 'spara.asp' ut?

Medlem sedan juli 20041 081 inlägg
#17

så här ser spara.asp ut nu:

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<!--
Detta script är kodat av Mattias Karlsson på bloody-mary.dk!
Scriptet får andvändas fritt så länge denna text är kvar.
[url]http://www.bloody-mary.dk[/url] - Ett Steg inom webutvecklingen 
-->

<body>
<% Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("gb.mdb") & ";pwd=;"

SQL = "Insert Into Inlagg(namn,rubrik,medelande,datum) Values('" & Request.Form("namn") & "', '" & Request.Form("rubrik") & "', '" & Request.Form("medelande") & "', #" & Request.Form("datum") & "#)"

Conn.Execute SQL,,128
Conn.Close
Set Conn = Nothing

Response.Redirect "gb.asp" %>  

</body>
</html>
Medlem sedan mars 20015 287 inlägg
#18

Du försöker nu även sätta in ett datum som du INTE skickar med din form, det ger dig ett felmess.
Du kan ändra din sql-fråga till:

SQL = "Insert Into Inlagg(namn,rubrik,medelande,datum) Values('" & Request.Form("namn") & "', '" & Request.Form("rubrik") & "', '" & Request.Form("medelande") & "', #" & Date() & "#)"

(Eller Now() om du vill ha med tiden.)

397 ms totalt · 4 externa anrop · v20260731065814-full.e96017d9
123 ms — deklarationer (db)
135 ms — hämta statistik (db)
130 ms — hämta tråd, inlägg och bilagor (db)
129 ms — ändringar (db)