02. november 2004 - 22:40
Der er
67 kommentarer og 2 løsninger
Fejl i min side
Hej
http://www.krellers.dk/sog/ se der prøv og søg og tilføj nogen der kan fortælle mig fejlen???
Annonceindlæg tema
Offentlig digitalisering
Fra effektivisering til digital suverænitet. Hvordan skaber det offentlige en digital fremtid med AI, sikkerhed og kontrol i centrum?
02. november 2004 - 22:42
#1
Tjeck stien i dine asp filer om de rooten til databasen ja eller navnet på databasen er korrekt...
02. november 2004 - 22:43
#2
ja men hvor??
02. november 2004 - 22:45
#3
jeg kan godt vise koderne for de filer i gerne vil se??
02. november 2004 - 22:45
#4
lav en Response.Write("SELECT blablabla din udtrækskode her") så du kan se hvad der sker Smid den før selve SELECT linien.
02. november 2004 - 22:47
#5
forstår jeg ikke lige??
02. november 2004 - 22:50
#6
axl_rose: først fortæl hvad din database hedder og om den ligger i samme folder som dine asp filer... og smid koden ind her til et af dine scripts så ser jeg på det
02. november 2004 - 22:54
#7
Det er for at fejlfinde. Den fejl du får er en typisk SQL-recordset fejl, når du fx laver en SELECT, UPDATE osv. En eller flere parametre er forkerte. Hvis jeg fx har en SELECT der ser sådan her ud: sqlRS = objDB.execute("SELECT * FROM fisk WHERE id="+request.querystring("id")) kan der måske være en fejl i min querystring, så jeg ikke får det id med, og så kommer der en "Too few parameters" fejl. For at fejlfinde, skriver jeg sådan her: response.write("SELECT * FROM fisk WHERE id="+request.querystring("id")) sqlRS = objDB.execute("SELECT * FROM fisk WHERE id="+request.querystring("id")) så kan jeg hurtigt om alt ser ud som det skal
02. november 2004 - 23:02
#8
kalp --> database.mdb og ja den ligger i sammen folder
02. november 2004 - 23:02
#9
Tilføj filen
<html>
<head>
<title></title>
<style type="text/css">
</style>
</head>
<body topmargin="0" leftmargin="0" bottommargin="0" background="
file:///D:/Webdesign%20-%20Sites/Kok-Site/j0289776.jpg"> <form action="form.asp" method="POST" class="css">
<p align="center"> </p>
<div align="center"><center><table border="0" cellpadding="2"
cellspacing="0" width="90%">
<tr>
<td align="left" width="6%" valign="top"></td>
<td colspan="2" width="93%">
<div style="position: absolute; width: 74px; height: 25px; z-index: 1; left: 45px; top: 10px" id="lag1">
<font face="Verdana" size="1">Tilføj |</font></div>
</td>
</tr>
<tr>
<td align="left" width="6%" valign="top">
<font size="1" face="Verdana">Navn:</font></td>
<td colspan="2" width="93%"><font size="1" face="Verdana">
<INPUT TYPE="text" NAME="navn" size="20" style="border-style: solid; border-width: 1px">*</font></td>
</tr>
<tr>
<td align="left" width="6%" valign="top">
<font size="1" face="Verdana">Adresse:</font></td>
<td colspan="2" width="93%"><font size="1" face="Verdana">
<INPUT TYPE="text" NAME="adresse" size="20" style="border-style: solid; border-width: 1px">*</font></td>
</tr>
<tr>
<td align="left" width="6%" valign="top">
<font face="Verdana" size="1">Postnr. & By:</font></td>
<td colspan="2" width="93%">
<input type="text" name="by" size="20" style="border-style: solid; border-width: 1px"><font size="1" face="Verdana">*</font></td>
</tr>
<tr>
<td align="left" width="6%" valign="top" height="23">
<font face="Verdana" size="1">E-mail</font></td>
<td colspan="2" width="93%" height="23">
<input type="text" name="email" size="20" style="font-family: Verdana; font-size: 8pt; border-style: solid; border-width: 1px" value="@"></td>
</tr>
<tr>
<td align="left" width="6%" valign="top">
<font face="Verdana" size="1">Specialitet:</font></td>
<td colspan="2" width="93%"><font size="1" face="Verdana">
<input type="text" name="specialitet" size="20" style="font-family: Verdana; font-size: 8pt; border-style: solid; border-width: 1px">*</font></td>
</tr>
<tr>
<td align="left" width="6%" valign="top" height="4"></td>
<td colspan="2" width="93%" height="4"></td>
</tr>
<tr>
<td align="left" width="6%" valign="top"></td>
<td colspan="2" width="93%"></td>
</tr>
<tr>
<td align="left" width="6%" valign="top" height="30">
<font size="1" face="Verdana">Søgeord:</font></td>
<td colspan="2" width="93%" height="30">
<font size="1" face="Verdana">
<INPUT TYPE="text" NAME="sogeord" size="47" style="border-style: solid; border-width: 1px">*</font></td>
</tr>
<tr>
<td align="Left" valign="top" width="6%" rowspan="3">
<font face="Verdana" size="1">Bemærkninger</font></td>
<td valign="top" width="39%" rowspan="2">
<font size="1" face="Verdana">
<textarea name="kommentar" rows="4"
cols="40" style="font-family: Verdana; font-size: 8pt; border-style: solid; border-width: 1px; padding: 0"></textarea></font></td>
<td valign="top" width="52%">
</td>
</tr>
<tr>
<td valign="top" width="52%">
</td>
</tr>
<tr>
<td valign="top" width="93%" colspan="2">
</td>
</tr>
<tr>
<td width="6%"></td>
<td colspan="2" width="93%"><font size="1" face="Verdana">
<input type="submit"
name="B1" value="Tilføj" style="font-family: Verdana; font-size: 8pt; border-style: solid; border-width: 1px">
<INPUT TYPE="reset" NAME="Slet" style="font-family: Verdana; font-size: 8pt; border-style: solid; border-width: 1px"></font></td>
</tr>
</table>
</left></div>
</form>
</html>
02. november 2004 - 23:02
#10
form filen <% Const adOpenKeyset = 1 Const adLockOptimistic = 3 Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "PROVIDER=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("database.mdb") & ";UID=admin;PWD=;" Set rs = Server.CreateObject("ADODB.RecordSet") strSQL = "Select * From links" rs.Open strSQL, Conn, adOpenKeyset, adLockOptimistic rs.AddNew rs("navn") = Request.form("navn") rs("adresse") = Request.form("adresse") rs("by") = Request.form("by") rs("email") = Request.form("email") rs("specialitetl") = Request.form("specialitet") rs("sogeord") = Request.form("sogeord") rs("kommentar") = Request.form("kommentar") rs.Update rs.Close Set rs = Nothing Conn.Close set Conn = Nothing %></p> <html> <head> <META HTTP-EQUIV="Refresh" CONTENT="5;URL=default.asp"> <title></title> </head> <FONT FACE="Arial" SIZE="+2">Dit link til din hjemmeside er nu blevet tilføget og du kan nu finde din hjemmeside i denne søgemaskine</FONT> </body> </html>
02. november 2004 - 23:03
#11
og søg filen <html><head> <title></title> </head> <!-- #include file="search.htm"--> <% strKeyword = Trim(Request.Form("Keyword")) If Len(strKeyword) = 0 Then Response.Clear Response.Redirect("search.asp") Else strKeyword = Replace(strKeyword,"'","''") End If strSQL = "SELECT LinkID, LinkName, Beskrivelse, LinkURL, LinkID, sogeord, min FROM links WHERE" strSQL = strSQL & " (LinkName LIKE '%" & strKeyword & "%')" strSQL = strSQL & " OR (sogeord LIKE '%" & strKeyword & "%')" strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("database.mdb") Set myConn = Server.CreateObject("ADODB.Connection") myConn.Open strDSN Set rs = myConn.Execute(strSQL) If Not (rs.BOF Or rs.EOF) Then Response.Write "<center>" Response.Write "<table border=""0"" cellspacing=""0"" width=""80%"" cellpadding=""3"" >" Do While Not rs.EOF Response.Write "<tr><td width=100% ><FONT FACE=""Verdana, Times New Roman"" SIZE=""2"" >" & rs("min") & "<a href=redirect.asp?linkid="& rs("LinkID")&" TARGET=_blank>"& rs("LinkName") &"</A> - " & rs("Beskrivelse")&"<BR></FONT><FONT FACE=""Verdana, Times New Roman"" SIZE=""1"" ></FONT> <FONT face=""Verdana, Times New Roman"" Size=""1"" >" & "</font><BR><font face=""Verdana, Times New Roman"" Size=""1"" >Adresse : </font><font face=""Verdana, Times New Roman"" Size=""1"" >" & rs("LinkURL") &" - <a href=redirect.asp?linkid="& rs("LinkID")&" TARGET=_blank></a><BR><HR></td></tr>" rs.MoveNext Loop Response.Write "</FONT></table>" Else Response.Write "<p><FONT FACE=""Verdana, Times New Roman"" SIZE=""2"" >Søg fandt ikke noget til dig!" End If myConn.Close Set myConn = Nothing %> </html>
02. november 2004 - 23:06
#12
axl_rose: Jeg smutter lige hjem til min egen pc.... er hjemme om ca 20min så kan jeg også bedre kigge på koden med alle mine værktøjer til at teste det af evt.
02. november 2004 - 23:10
#13
okay takker!!
02. november 2004 - 23:55
#14
kigger på det nu... mit spørgsmål er lige hurtigt.. prøv denne kode <html><head> <title></title> </head> <!-- #include file="search.htm"--> <% strKeyword = Trim(Request.Form("Keyword")) If Len(strKeyword) = 0 Then Response.Clear Response.Redirect("search.asp") Else strKeyword = Replace(strKeyword,"'","''") End If strSQL = "SELECT ID, LinkName, Beskrivelse, LinkURL, LinkID, sogeord, min FROM links WHERE" strSQL = strSQL & " (LinkName LIKE '%" & strKeyword & "%')" strSQL = strSQL & " OR (sogeord LIKE '%" & strKeyword & "%')" strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("database.mdb") Set myConn = Server.CreateObject("ADODB.Connection") myConn.Open strDSN Set rs = myConn.Execute(strSQL) If Not (rs.BOF Or rs.EOF) Then Response.Write "<center>" Response.Write "<table border=""0"" cellspacing=""0"" width=""80%"" cellpadding=""3"" >" Do While Not rs.EOF Response.Write "<tr><td width=100% ><FONT FACE=""Verdana, Times New Roman"" SIZE=""2"" >" & rs("min") & "<a href=redirect.asp?linkid="& rs("LinkID")&" TARGET=_blank>"& rs("LinkName") &"</A> - " & rs("Beskrivelse")&"<BR></FONT><FONT FACE=""Verdana, Times New Roman"" SIZE=""1"" ></FONT> <FONT face=""Verdana, Times New Roman"" Size=""1"" >" & "</font><BR><font face=""Verdana, Times New Roman"" Size=""1"" >Adresse : </font><font face=""Verdana, Times New Roman"" Size=""1"" >" & rs("LinkURL") &" - <a href=redirect.asp?linkid="& rs("LinkID")&" TARGET=_blank></a><BR><HR></td></tr>" rs.MoveNext Loop Response.Write "</FONT></table>" Else Response.Write "<p><FONT FACE=""Verdana, Times New Roman"" SIZE=""2"" >Søg fandt ikke noget til dig!" End If myConn.Close Set myConn = Nothing %> </html>
03. november 2004 - 00:08
#15
er bare ikke sikker på hvorfor du skriver linkID to gange.. her strSQL = "SELECT LinkID, LinkName, Beskrivelse, LinkURL, LinkID, sogeord, min FROM links WHERE" men her er koden lavet om til det... hvis den ikke virker tror jeg der er noget galt i din database... evt noget med dine felter <html><head> <title></title> </head> <!-- #include file="search.htm"--> <% strKeyword = Trim(Request.Form("Keyword")) If Len(strKeyword) = 0 Then Response.Clear Response.Redirect("search.asp") Else strKeyword = Replace(strKeyword,"'","''") End If strSQL = "SELECT LinkID, LinkName, Beskrivelse, LinkURL, LinkID, sogeord, min FROM links WHERE (LinkName LIKE '%" & strKeyword & "%') OR OR (sogeord LIKE '%" & strKeyword & "%')" strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("database.mdb") Set myConn = Server.CreateObject("ADODB.Connection") myConn.Open strDSN Set rs = myConn.Execute(strSQL) If Not (rs.BOF Or rs.EOF) Then Response.Write "<center>" Response.Write "<table border=""0"" cellspacing=""0"" width=""80%"" cellpadding=""3"" >" Do While Not rs.EOF Response.Write "<tr><td width=100% ><FONT FACE=""Verdana, Times New Roman"" SIZE=""2"" >" & rs("min") & "<a href=redirect.asp?linkid="& rs("LinkID")&" TARGET=_blank>"& rs("LinkName") &"</A> - " & rs("Beskrivelse")&"<BR></FONT><FONT FACE=""Verdana, Times New Roman"" SIZE=""1"" ></FONT> <FONT face=""Verdana, Times New Roman"" Size=""1"" >" & "</font><BR><font face=""Verdana, Times New Roman"" Size=""1"" >Adresse : </font><font face=""Verdana, Times New Roman"" Size=""1"" >" & rs("LinkURL") &" - <a href=redirect.asp?linkid="& rs("LinkID")&" TARGET=_blank></a><BR><HR></td></tr>" rs.MoveNext Loop Response.Write "</FONT></table>" Else Response.Write "<p><FONT FACE=""Verdana, Times New Roman"" SIZE=""2"" >Søg fandt ikke noget til dig!" End If myConn.Close Set myConn = Nothing %> </html>
03. november 2004 - 11:03
#16
nu kommer der en ny fejl hvad kan det så være??
03. november 2004 - 11:47
#17
hvad skriver den af fejl?
03. november 2004 - 13:34
#18
Microsoft OLE DB Provider for ODBC Drivers error '80040e14' [Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression '(LinkName LIKE '%kreller%') OR OR (sogeord LIKE '%kreller%')'. /sog/search.asp, line 19
03. november 2004 - 13:35
#19
prøv og klik på tilføj link og skriv noed... den der, der hedder form.asp siger bare siden kan ikke vises..
03. november 2004 - 13:36
#20
men det er fordi jeg har rettet is criptet fordi de felter der er under tilføj link var nogen andre så har jeg selv tilføjet nogen og så prøvede jeg mig frem og rettede dem i form.asp til det og så gik den i stykker Altså jeg skal have en tilmeldings form som gemmes i en database, men også sender daten til en email og så et søegscript der søger i den database
03. november 2004 - 13:39
#21
prøv lige at rette den kode til det her strSQL = "SELECT LinkID, LinkName, Beskrivelse, LinkURL, LinkID, sogeord, min FROM links WHERE (LinkName LIKE '%" & strKeyword & "%') OR (sogeord LIKE '%" & strKeyword & "%')"
03. november 2004 - 13:58
#22
tror problemet er der felterne i databsen hedder LinkId, navn, adresse, by, specialitet, sogeord, email, kommentar
03. november 2004 - 14:36
#23
men kan det være det???
03. november 2004 - 16:16
#24
men hvad kan det være det???
03. november 2004 - 16:19
#25
kalp -->> Tror du så kan lave et script i ASP hvor man kan tilmelde sig og den ryger ind i en databse og ryger afsted til en email adresse også. Og så et script der søger i den database...
05. november 2004 - 19:21
#26
axl: Du kan sende mig databasen... adasdasdasd@hotmail.com så skal jeg se om jeg orker det:) burde kunne.. men hold din egen side oppe så jeg kan kigge på den
08. november 2004 - 15:14
#27
Jeg har lavet det fik hjælp af en ven, men ellers mange ták.... kalp --> smider du ikke svar, du skal have pointsene...
08. november 2004 - 16:45
#28
Tak skal du have: ) Skriv endelig hvis du løber på nye problemer!
08. november 2004 - 17:14
#29
Hey takker
prøv og se her
www.krellers.dk/sog.asp <%
IF Request.Querystring("keyword") <> "" THEN
Set rs = Conn.Execute("SELECT * FROM tilmeld WHERE specialitet = '" & Request.Querystring("keyword") & "'")
IF NOT (rs.EOF OR rs.BOF) THEN
DO WHILE NOT rs.EOF
Response.Write "<p align=""left""><font face=""verdana"" size=""1""><b>" & rs("efternavn") & ",</b> " & rs("fornavn") & rs("adresse") & rs("bopael") & rs("specialitet") & rs("bemaerkninger") & rs("email") /p>"
rs.MoveNext
Loop
Response.Write "</p>"
ELSE
Response.Write "<p align=""center""><font face=""verdana"" size=""1""><b>Ingen kokke med den specialitet</b></p>"
END IF
END IF
%>
11. november 2004 - 11:02
#30
kan du vise mig linie fejlen ligger på?
11. november 2004 - 11:43
#31
Hej har fundet fejlen, og det hele er rettet. Med undtagelse af en ting, den er noget mere avanceret. Når man har udfyldt tilmeldingen og trykket send tilmelding, så bliver man sendt videre til en uploads funktion, den uploader billeder til en mappe, men den skal hvis man vælger at have et billede ved sin tekst som man har skrevet under tilmeldingen før. Altså så skal billedet loádes op i mappen som den plejer men også blive registreret i databasen under det navn osv. som lige den kunde har skrevet.
11. november 2004 - 12:09
#32
det muligvis avanceret, men der er en som lige præcis har samme problem her: ) og der er løsningsforslag til det
http://www.eksperten.dk/spm/558755
11. november 2004 - 13:03
#33
Kan du så se på¨dette problem, har rpøvet at implenmentere en upload funktion ind i min tilmelding i stedet så kommer denne fejl: Microsoft OLE DB Provider for ODBC Drivers error '80040e07' [Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression. /kok-site/tilmeld/tilmeld.asp, line 21 og her er tilmeld.asp koden: <% Response.Buffer = True Set Conn = Server.CreateObject("ADODB.Connection") DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("*********.mdb") Conn.Open DSN strFornavn = Request.Form("fornavn") strEfternavn = Request.Form("efternavn") strAdresse = Request.Form("adresse") strPostnr = Request.Form("postnr") strBy = Request.Form("by") strSpecialitet = Request.Form("specialitet") strEmail = Request.Form("email") strTelefon = Request.Form("telefon") strMobil = Request.Form("mobil") strFax = Request.Form("fax") strBemaerkninger = Request.Form("bemaerkninger") strUpload = Request.Form("upload") Linie 21 --> Conn.Execute("INSERT INTO tilmeld (fornavn, efternavn, adresse, postnr, bopael, specialitet, email, telefon, mobil, fax, bemaerkninger, upload) VALUES ('" & strFornavn & "','" & strEfternavn & "','" & strAdresse & "','" & strPostnr & "','" & strBy & "','" & strSpecialitet & "','" & strEmail & "','" & strTelefon & "','" & strMobil & "','" & strFax & "','" & strBemaerkninger & "','" & strUpload & "')") Set rs = Conn.Execute("SELECT * FROM tilmeld ORDER BY id DESC") strBody = "Fornavn: " & strFornavn & vbCrLf strBody = strBody & "Efternavn: " & strEfternavn & vbCrLf strBody = strBody & "Adresse: " & strAdresse & vbCrLf strBody = strBody & "Post nr / By: " & strPostnr & " " & strBy & vbCrLf strBody = strBody & "Specialitet: " & strSpecialitet & vbCrLf strBody = strBody & "Email: " & strEmail & vbCrLf strBody = strBody & "Telefon: " & strTelefon & vbCrLf strBody = strBody & "Mobil: " & strMobil & vbCrLf strBody = strBody & "Fax: " & strFax & vbCrLf strBody = strBody & "Bemærkninger: " & strBemaerkninger & vbCrLf strBody = strBody & "Upload: " & strUpload & vbCrLf strBody = strBody & "ID: " & rs("id") Set msg = Server.CreateObject("JMail.Message") msg.From = "kreller@krellers.dk" 'Bare skriv denne samme mail her og neden under msg.AddRecipient "email@email.dk" msg.Subject = "Ny kunde - KokAmok" msg.Body = strBody msg.Send("mail.***********") Response.Redirect "uploadfile.asp" rs.Close Conn.Close Set rs = Nothing Set Conn = Nothing %>
11. november 2004 - 13:06
#34
prøv Conn.Execute("INSERT INTO tilmeld (fornavn, efternavn, adresse, postnr, bopael, specialitet, email, telefon, mobil, fax, bemaerkninger, upload) VALUES ('" & strFornavn & "','" & strEfternavn & "','" & strAdresse & "','" & strPostnr & "','" & strBopael & "','" & strSpecialitet & "','" & strEmail & "','" & strTelefon & "','" & strMobil & "','" & strFax & "','" & strBemaerkninger & "','" & strUpload & "')")
11. november 2004 - 13:06
#35
hvis det i orden at jeg svare for ham
11. november 2004 - 13:07
#36
så skal denne også rettes. hvis det jeg lige skrev var rigtigt strBody = strBody & "Post nr / By: " & strPostnr & " " & strBopael & vbCrLf
11. november 2004 - 13:09
#37
Det er helt iorden!!! :)
11. november 2004 - 13:11
#38
Microsoft OLE DB Provider for ODBC Drivers error '80040e07' [Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression. /kok-site/tilmeld/tilmeld.asp, line 21 den fejl kom igen!
11. november 2004 - 13:12
#39
"så skal denne også rettes. hvis det jeg lige skrev var rigtigt strBody = strBody & "Post nr / By: " & strPostnr & " " & strBopael & vbCrLf" Den besked forstod jeg ikke lige
11. november 2004 - 13:15
#40
før du overhovedet begynder at rette i din kode ville jeg kigge på noget andet.. Data type mismatch in criteria expression. lyder som om den data du prøver at smide ind i din database ikke passer med den datatyper du har sat et eller flere felter til! dvs. hvis By er i din database ved en fejl er sat til at rumme tal og du prøver at gemme tekst i den vil der komme en fejl... tjek om din databases felter kommer til at rumme de rigtige værdier. åben dit database .marker din tabel.. klik design og kig der
11. november 2004 - 13:21
#41
Hvordan ændrer jeg det hvis det er og ser det??
11. november 2004 - 13:25
#42
Den kommer stadig har ændret det, Altså feltet upload i min databse står også til tekst, men den skal jo uploade et billede?? her er filen hvor selve tilmeldings skemaet er i: <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252"> <meta name="GENERATOR" content="Microsoft FrontPage 6.0"> <meta name="ProgId" content="FrontPage.Editor.Document"> </head> <body background="../j0289776.jpg"> <p align="left"><font face="Verdana" size="1">Tilmeld | <br> Her kan du tilmelde dig og blive bla bla bla bla.......</font></p> <form method="POST" action="tilmeld.asp" enctype="multipart/form-data"> <table border="0" width="21%" cellspacing="0" cellpadding="0" align="left"> <tr> <td width="50%" valign="top"><font size="1" face="Verdana">Fornavn</font></td> <td width="50%"><font size="1" face="Verdana"><b> <input name="fornavn" size="20"></b></font></td> </tr> <tr> <td width="50%" valign="top"><font size="1" face="Verdana">Efternavn</font></td> <td width="50%"><font size="1" face="Verdana"><b> <input name="efternavn" size="20"></b></font></td> </tr> <tr> <td width="50%" valign="top"><font size="1" face="Verdana">Adresse</font></td> <td width="50%"><font size="1" face="Verdana"><b> <input name="adresse" size="20"></b></font></td> </tr> <tr> <td width="50%" valign="top"><font size="1" face="Verdana">Post nr. / By</font></td> <td width="50%"><font size="1" face="Verdana"><b> <input name="postnr" size="2"> <input name="bopael" size="14"></b></font></td> </tr> <tr> <td width="50%" valign="top"><font size="1" face="Verdana">Specialitet</font></td> <td width="50%"> <font size="1" face="Verdana"> <select name="specialitet" multiple size="1"> <option>Vælg her... <option>-------------------------- <option value="fisk">Fisk <option value="grill">Grill <option value="italiansk_mad">Italiansk mad </select> </font> </td> </tr> <tr> <td width="50%" valign="top"><font size="1" face="Verdana">Email</font></td> <td width="50%"><font size="1" face="Verdana"><b> <input name="email" size="20"></b></font></td> </tr> <tr> <td width="50%" valign="top"><font face="Verdana" size="1">Telefon</font></td> <td width="50%"><font size="1" face="Verdana"><b> <input name="telefon" size="20"></b></font></td> </tr> <tr> <td width="50%" valign="top"><font face="Verdana" size="1">Mobil</font></td> <td width="50%"><font size="1" face="Verdana"><b> <input name="mobil" size="20"></b></font></td> </tr> <tr> <td width="50%" valign="top"><font face="Verdana" size="1">Fax</font></td> <td width="50%"><font size="1" face="Verdana"><b> <input name="fax" size="20"></b></font></td> </tr> <tr> <td width="50%" valign="top"><font size="1" face="Verdana">Bemærkninger</font></td> <td width="50%"><font size="1" face="Verdana"><b> <input name="bemaerkninger" size="20"></b></font></td> </tr> <tr> <td width="50%" valign="top"><font face="Verdana" size="1">Upload</font></td> <td width="50%"><input type="file" name="upload" size="20"></td> </tr> <tr> <td width="50%" valign="top"><font size="1" face="Verdana"> </font></td> <td width="50%"> <input type="submit" value="Send tilmeldning" name="B1" style="font-family: Verdana; font-size: 10 px; "></td> </tr> <tr> <td width="50%" valign="top"></td> <td width="50%"> </td> </tr> </table> </form> </body> </html>
11. november 2004 - 13:25
#43
åben din database marker din tabel tilmeld tryk på "Design" gå igennem de forskellige felter... der står datatypefelt eller sådan noget ud for hver af de forskellige ting du har i databasen... fx kan der står ... Name : Txt ud for navn... hvis der hvis der stod Name : Number så skal du lige ændre den til txt kig dem igennem
11. november 2004 - 13:27
#44
upload skal kun rumme navnet på dit billede så det er det skal bare være tekst.. men kig de andre igennem også
11. november 2004 - 13:27
#45
NU VIRKET DET!!!!. Nu er fjelen at når man har fundet det billede man vil uploade den er ikke på serveren??? hvorfor er dne ikke det??
11. november 2004 - 13:29
#46
og nu har jeg prøvet se i databasen og det tekst jeg har tilføjet er der altså de er registreret med id men navn osv... er blanke hvorfor egentlig det??
11. november 2004 - 13:33
#47
strBody = strBody & "Fornavn: " & strFornavn & vbCrLf strBody = strBody & "Efternavn: " & strEfternavn & vbCrLf strBody = strBody & "Adresse: " & strAdresse & vbCrLf strBody = strBody & "Post nr / By: " & strPostnr & " " & strBy & vbCrLf strBody = strBody & "Specialitet: " & strSpecialitet & vbCrLf strBody = strBody & "Email: " & strEmail & vbCrLf strBody = strBody & "Telefon: " & strTelefon & vbCrLf strBody = strBody & "Mobil: " & strMobil & vbCrLf strBody = strBody & "Fax: " & strFax & vbCrLf strBody = strBody & "Bemærkninger: " & strBemaerkninger & vbCrLf strBody = strBody & "Upload: " & strUpload & vbCrLf strBody = strBody & "ID: " & strUpload & rs("id")
11. november 2004 - 13:37
#48
Fornavn: Efternavn: Adresse: Post nr / By: Specialitet: Email: Telefon: Mobil: Fax: Bemærkninger: Upload: ID: 2 Sådan serde tilmeldinger ud i databasen og når jeg modtager dem på min mail
11. november 2004 - 13:38
#49
altså i databsen hedder den ikke by men bopael så skal den ikke hedde bopael istedet for by??
11. november 2004 - 13:42
#50
det rettelser vi lige har lavet forudsætter at der er noget som hedder bopael i databasen... mener vi rettede det andet... det her strBody = strBody & "Fornavn: " & strFornavn & vbCrLf strBody = strBody & "Efternavn: " & strEfternavn & vbCrLf strBody = strBody & "Adresse: " & strAdresse & vbCrLf strBody = strBody & "Post nr / By: " & strPostnr & " " & strBy & vbCrLf strBody = strBody & "Specialitet: " & strSpecialitet & vbCrLf strBody = strBody & "Email: " & strEmail & vbCrLf strBody = strBody & "Telefon: " & strTelefon & vbCrLf strBody = strBody & "Mobil: " & strMobil & vbCrLf strBody = strBody & "Fax: " & strFax & vbCrLf strBody = strBody & "Bemærkninger: " & strBemaerkninger & vbCrLf strBody = strBody & "Upload: " & strUpload & vbCrLf strBody = strBody & "ID: " & strUpload & rs("id") kan laves på en anden måde.. kan være det er derfor.. nu sidder jeg ikke lige med den metode jeg pleger at bruger men kan se på det når jeg kommer hjem hvis det ikke er løst til den tid
11. november 2004 - 14:48
#51
Okay må du meget gerne!!
11. november 2004 - 21:24
#52
Er der nogen?
11. november 2004 - 21:52
#53
så er jeg hjemme.. kigger lige
11. november 2004 - 21:57
#54
okay.. et skud fra hoften.. prøv lige med denne side istedet <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252"> <meta name="GENERATOR" content="Microsoft FrontPage 6.0"> <meta name="ProgId" content="FrontPage.Editor.Document"> </head> <body background="../j0289776.jpg"> <p align="left"><font face="Verdana" size="1">Tilmeld | <br> Her kan du tilmelde dig og blive bla bla bla bla.......</font></p> <form method="POST" action="tilmeld.asp" enctype="multipart/form-data"> <table border="0" width="21%" cellspacing="0" cellpadding="0" align="left"> <tr> <td width="50%" valign="top"><font size="1" face="Verdana">Fornavn</font></td> <td width="50%"><font size="1" face="Verdana"><b> <input name="strfornavn" size="20"></b></font></td> </tr> <tr> <td width="50%" valign="top"><font size="1" face="Verdana">Efternavn</font></td> <td width="50%"><font size="1" face="Verdana"><b> <input name="strstrefternavn" size="20"></b></font></td> </tr> <tr> <td width="50%" valign="top"><font size="1" face="Verdana">Adresse</font></td> <td width="50%"><font size="1" face="Verdana"><b> <input name="stradresse" size="20"></b></font></td> </tr> <tr> <td width="50%" valign="top"><font size="1" face="Verdana">Post nr. / By</font></td> <td width="50%"><font size="1" face="Verdana"><b> <input name="strpostnr" size="2"> <input name="strbopael" size="14"></b></font></td> </tr> <tr> <td width="50%" valign="top"><font size="1" face="Verdana">Specialitet</font></td> <td width="50%"> <font size="1" face="Verdana"> <select name="specialitet" multiple size="1"> <option>Vælg her... <option>-------------------------- <option value="fisk">Fisk <option value="grill">Grill <option value="italiansk_mad">Italiansk mad </select> </font> </td> </tr> <tr> <td width="50%" valign="top"><font size="1" face="Verdana">Email</font></td> <td width="50%"><font size="1" face="Verdana"><b> <input name="stremail" size="20"></b></font></td> </tr> <tr> <td width="50%" valign="top"><font face="Verdana" size="1">Telefon</font></td> <td width="50%"><font size="1" face="Verdana"><b> <input name="strtelefon" size="20"></b></font></td> </tr> <tr> <td width="50%" valign="top"><font face="Verdana" size="1">Mobil</font></td> <td width="50%"><font size="1" face="Verdana"><b> <input name="strmobil" size="20"></b></font></td> </tr> <tr> <td width="50%" valign="top"><font face="Verdana" size="1">Fax</font></td> <td width="50%"><font size="1" face="Verdana"><b> <input name="strfax" size="20"></b></font></td> </tr> <tr> <td width="50%" valign="top"><font size="1" face="Verdana">Bemærkninger</font></td> <td width="50%"><font size="1" face="Verdana"><b> <input name="strbemaerkninger" size="20"></b></font></td> </tr> <tr> <td width="50%" valign="top"><font face="Verdana" size="1">Upload</font></td> <td width="50%"><input type="file" name="strupload" size="20"></td> </tr> <tr> <td width="50%" valign="top"><font size="1" face="Verdana"> </font></td> <td width="50%"> <input type="submit" value="Send tilmeldning" name="B1" style="font-family: Verdana; font-size: 10 px; "></td> </tr> <tr> <td width="50%" valign="top"></td> <td width="50%"> </td> </tr> </table> </form> </body> </html>
11. november 2004 - 21:57
#55
for er lidt forvirret over noget ting.. vil gerne udelukke dette.. hvis det ikke virker altså!
11. november 2004 - 22:23
#56
Felterne i databsen er fuldstædig tomme og er er ikke loadet noed billed op? her er min tilmeld.asp det er vel den der klarer det med alt der tam tam: <% Response.Buffer = True Set Conn = Server.CreateObject("ADODB.Connection") DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db.mdb") Conn.Open DSN strFornavn = Request.Form("fornavn") strEfternavn = Request.Form("efternavn") strAdresse = Request.Form("adresse") strPostnr = Request.Form("postnr") strBy = Request.Form("by") strSpecialitet = Request.Form("specialitet") strEmail = Request.Form("email") strTelefon = Request.Form("telefon") strMobil = Request.Form("mobil") strFax = Request.Form("fax") strBemaerkninger = Request.Form("bemaerkninger") strUpload = Request.Form("upload") Conn.Execute("INSERT INTO tilmeld (fornavn, efternavn, adresse, postnr, bopael, specialitet, email, telefon, mobil, fax, bemaerkninger, upload) VALUES ('" & strFornavn & "','" & strEfternavn & "','" & strAdresse & "','" & strPostnr & "','" & strBopael & "','" & strSpecialitet & "','" & strEmail & "','" & strTelefon & "','" & strMobil & "','" & strFax & "','" & strBemaerkninger & "','" & strUpload & "')") Set rs = Conn.Execute("SELECT * FROM tilmeld ORDER BY id DESC") strBody = strBody & "Fornavn: " & strFornavn & vbCrLf strBody = strBody & "Efternavn: " & strEfternavn & vbCrLf strBody = strBody & "Adresse: " & strAdresse & vbCrLf strBody = strBody & "Post nr / By: " & strPostnr & " " & strBy & vbCrLf strBody = strBody & "Specialitet: " & strSpecialitet & vbCrLf strBody = strBody & "Email: " & strEmail & vbCrLf strBody = strBody & "Telefon: " & strTelefon & vbCrLf strBody = strBody & "Mobil: " & strMobil & vbCrLf strBody = strBody & "Fax: " & strFax & vbCrLf strBody = strBody & "Bemærkninger: " & strBemaerkninger & vbCrLf strBody = strBody & "Upload: " & strUpload & vbCrLf strBody = strBody & "ID: " & strUpload & rs("id") Set msg = Server.CreateObject("JMail.Message") msg.From = "kreller@krellers.dk" 'Bare skriv denne samme mail her og neden under msg.AddRecipient "kreller@krellers.dk" msg.Subject = "Ny kunde - KokAmok" msg.Body = strBody msg.Send("mail.krellers.dk") Response.Redirect "uploadfile.asp" rs.Close Conn.Close Set rs = Nothing Set Conn = Nothing %>
12. november 2004 - 08:44
#57
vent til i aften så laver jeg lige mit forslag til hvordan du kan gøre.. med en anden tilmeldingsside
13. november 2004 - 03:22
#58
tror dine felter er tomme fordi din insert into mangler noget... efter VALUES skal du skrive sådan her ('" & Request("strFornavn") & "','" & Replace (Request("strEfternavn"), "'", "''" ) & "' ,'" & Request("strPostnr") det hele skal altså smides ind i en Request("") !!
14. november 2004 - 20:29
#59
Okay kan du ikke sætte det ind i den færdige kode??
15. november 2004 - 00:25
#60
prøvede at undgå.... det jo vildt kedeligt hehe men her we go.. Conn.Execute("INSERT INTO tilmeld (fornavn, efternavn, adresse, postnr, bopael, specialitet, email, telefon, mobil, fax, bemaerkninger, upload) VALUES '" & Request("strFornavn") & "','" & Replace (Request("strEfternavn"), "'", "''" ) & "' ,'" & Request("strPostnr") & "','" & Request("strBopael") & "','" & Request("Specialitet")& "','" & Request("strEmail") & "','" & Request("strTelefon") & "','" & Request("strMobil")& "','" & Request("strFax") & "','" & Request("strBemaerkninger") & "','" & Request("strUpload") & "')") nu håber jeg at jeg har lukket den rigtig af til sidst..
16. november 2004 - 10:22
#61
Hej Undskyld den lange ventetid men har også afgangsprojekt i skolen. Der er en fejl tilbage nu det er: Microsoft OLE DB Provider for ODBC Drivers error '80040e14' [Microsoft][ODBC Microsoft Access Driver] Syntax error in INSERT INTO statement. /kok-site/tilmeld/tilmeld.asp, line 21
17. november 2004 - 02:12
#62
er linie 26 denne? & "','" & Request("strUpload") & "')")
17. november 2004 - 21:26
#63
Her er min tilmeld.asp efter det du har lavet er sat ind. <% Response.Buffer = True Set Conn = Server.CreateObject("ADODB.Connection") DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("********.mdb") Conn.Open DSN strFornavn = Request.Form("fornavn") strEfternavn = Request.Form("efternavn") strAdresse = Request.Form("adresse") strPostnr = Request.Form("postnr") strBy = Request.Form("by") strSpecialitet = Request.Form("specialitet") strEmail = Request.Form("email") strTelefon = Request.Form("telefon") strMobil = Request.Form("mobil") strFax = Request.Form("fax") strBemaerkninger = Request.Form("bemaerkninger") strUpload = Request.Form("upload") Conn.Execute("INSERT INTO tilmeld (fornavn, efternavn, adresse, postnr, bopael, specialitet, email, telefon, mobil, fax, bemaerkninger, upload) VALUES '" & Request("strFornavn") & "','" & Replace (Request("strEfternavn"), "'", "''" ) & "' ,'" & Request("strPostnr") & "','" & Request("strBopael") & "','" & Request("Specialitet")& "','" & Request("strEmail") & "','" & Request("strTelefon") & "','" & Request("strMobil")& "','" & Request("strFax") & "','" & Request("strBemaerkninger") & "','" & Request("strUpload") & "')") Set rs = Conn.Execute("SELECT * FROM tilmeld ORDER BY id DESC") strBody = strBody & "Fornavn: " & strFornavn & vbCrLf strBody = strBody & "Efternavn: " & strEfternavn & vbCrLf strBody = strBody & "Adresse: " & strAdresse & vbCrLf strBody = strBody & "Post nr / By: " & strPostnr & " " & strBy & vbCrLf strBody = strBody & "Specialitet: " & strSpecialitet & vbCrLf strBody = strBody & "Email: " & strEmail & vbCrLf strBody = strBody & "Telefon: " & strTelefon & vbCrLf strBody = strBody & "Mobil: " & strMobil & vbCrLf strBody = strBody & "Fax: " & strFax & vbCrLf strBody = strBody & "Bemærkninger: " & strBemaerkninger & vbCrLf strBody = strBody & "Upload: " & strUpload & vbCrLf strBody = strBody & "ID: " & strUpload & rs("id") Set msg = Server.CreateObject("JMail.Message") msg.From = "kreller@krellers.dk" 'Bare skriv denne samme mail her og neden under msg.AddRecipient "kreller@krellers.dk" msg.Subject = "Ny kunde - KokAmok" msg.Body = strBody msg.Send("mail.krellers.dk") Response.Redirect "*****" rs.Close Conn.Close Set rs = Nothing Set Conn = Nothing %>
18. november 2004 - 11:10
#64
tror den er lukket forkert.. kigger lige på det når jeg kommer hjem i aften.
18. november 2004 - 15:13
#65
Conn.Execute("INSERT INTO tilmeld (fornavn, efternavn, adresse, postnr, bopael, specialitet, email, telefon, mobil, fax, bemaerkninger, upload) VALUES '" & Request("strFornavn") & "','" & Replace (Request("strEfternavn"), "'", "''" ) & "' ,'" & Request("strPostnr") & "','" & Request("strBopael") & "','" & Request("Specialitet")& "','" & Request("strEmail") & "','" & Request("strTelefon") & "','" & Request("strMobil")& "','" & Request("strFax") & "','" & Request("strBemaerkninger") & "','" & Request("strUpload") & "')"
22. november 2004 - 11:37
#66
virker det?
01. december 2004 - 17:03
#67
opgivet
01. december 2004 - 17:29
#68
Ja
01. december 2004 - 17:29
#69
Lavede den helt om
Kurser inden for grundlæggende programmering