Avatar billede axl_rose Nybegynder
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???
Avatar billede kalp Novice
02. november 2004 - 22:42 #1
Tjeck stien i dine asp filer om de rooten til databasen ja eller navnet på databasen er korrekt...
Avatar billede axl_rose Nybegynder
02. november 2004 - 22:43 #2
ja men hvor??
Avatar billede axl_rose Nybegynder
02. november 2004 - 22:45 #3
jeg kan godt vise koderne for de filer i gerne vil se??
Avatar billede pixelpaw Nybegynder
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.
Avatar billede axl_rose Nybegynder
02. november 2004 - 22:47 #5
forstår jeg ikke lige??
Avatar billede kalp Novice
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
Avatar billede pixelpaw Nybegynder
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
Avatar billede axl_rose Nybegynder
02. november 2004 - 23:02 #8
kalp -->

database.mdb og ja den ligger i sammen folder
Avatar billede axl_rose Nybegynder
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">&nbsp;</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>
&nbsp;</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. &amp; 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%">
            &nbsp;</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&oslash;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>
Avatar billede axl_rose Nybegynder
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>
Avatar billede axl_rose Nybegynder
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&oslash;g fandt ikke noget til dig!"
End If
myConn.Close
Set myConn = Nothing
%>
</html>
Avatar billede kalp Novice
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.
Avatar billede axl_rose Nybegynder
02. november 2004 - 23:10 #13
okay takker!!
Avatar billede kalp Novice
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&oslash;g fandt ikke noget til dig!"
End If
myConn.Close
Set myConn = Nothing
%>
</html>
Avatar billede kalp Novice
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&oslash;g fandt ikke noget til dig!"
End If
myConn.Close
Set myConn = Nothing
%>


</html>
Avatar billede axl_rose Nybegynder
03. november 2004 - 11:03 #16
nu kommer der en ny fejl hvad kan det så være??
Avatar billede kalp Novice
03. november 2004 - 11:47 #17
hvad skriver den af fejl?
Avatar billede axl_rose Nybegynder
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
Avatar billede axl_rose Nybegynder
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..
Avatar billede axl_rose Nybegynder
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
Avatar billede kalp Novice
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 & "%')"
Avatar billede axl_rose Nybegynder
03. november 2004 - 13:58 #22
tror problemet er der felterne i databsen hedder LinkId, navn, adresse, by, specialitet, sogeord, email, kommentar
Avatar billede axl_rose Nybegynder
03. november 2004 - 14:36 #23
men kan det være det???
Avatar billede axl_rose Nybegynder
03. november 2004 - 16:16 #24
men hvad kan det være det???
Avatar billede axl_rose Nybegynder
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...
Avatar billede kalp Novice
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
Avatar billede axl_rose Nybegynder
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...
Avatar billede kalp Novice
08. november 2004 - 16:45 #28
Tak skal du have: )
Skriv endelig hvis du løber på nye problemer!
Avatar billede axl_rose Nybegynder
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
%>
Avatar billede kalp Novice
11. november 2004 - 11:02 #30
kan du vise mig linie fejlen ligger på?
Avatar billede axl_rose Nybegynder
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.
Avatar billede kalp Novice
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
Avatar billede axl_rose Nybegynder
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
%>
Avatar billede data2k.dk Nybegynder
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 & "')")
Avatar billede data2k.dk Nybegynder
11. november 2004 - 13:06 #35
hvis det i orden at jeg svare for ham
Avatar billede data2k.dk Nybegynder
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
Avatar billede axl_rose Nybegynder
11. november 2004 - 13:09 #37
Det er helt iorden!!! :)
Avatar billede axl_rose Nybegynder
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!
Avatar billede axl_rose Nybegynder
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
Avatar billede kalp Novice
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
Avatar billede axl_rose Nybegynder
11. november 2004 - 13:21 #41
Hvordan ændrer jeg det hvis det er og ser det??
Avatar billede axl_rose Nybegynder
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">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
        <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">&nbsp;</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%">&nbsp;</td>
    </tr>
  </table>
</form>
</body>

</html>
Avatar billede kalp Novice
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
Avatar billede kalp Novice
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å
Avatar billede axl_rose Nybegynder
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??
Avatar billede axl_rose Nybegynder
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??
Avatar billede kalp Novice
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")
Avatar billede axl_rose Nybegynder
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
Avatar billede axl_rose Nybegynder
11. november 2004 - 13:38 #49
altså i databsen hedder den ikke by men bopael så skal den ikke hedde bopael istedet for by??
Avatar billede kalp Novice
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
Avatar billede axl_rose Nybegynder
11. november 2004 - 14:48 #51
Okay må du meget gerne!!
Avatar billede axl_rose Nybegynder
11. november 2004 - 21:24 #52
Er der nogen?
Avatar billede kalp Novice
11. november 2004 - 21:52 #53
så er jeg hjemme.. kigger lige
Avatar billede kalp Novice
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">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
        <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">&nbsp;</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%">&nbsp;</td>
    </tr>
  </table>
</form>
</body>

</html>
Avatar billede kalp Novice
11. november 2004 - 21:57 #55
for er lidt forvirret over noget ting.. vil gerne udelukke dette.. hvis det ikke virker altså!
Avatar billede axl_rose Nybegynder
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
%>
Avatar billede kalp Novice
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
Avatar billede kalp Novice
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("") !!
Avatar billede axl_rose Nybegynder
14. november 2004 - 20:29 #59
Okay kan du ikke sætte det ind i den færdige kode??
Avatar billede kalp Novice
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..
Avatar billede axl_rose Nybegynder
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
Avatar billede kalp Novice
17. november 2004 - 02:12 #62
er linie 26 denne?

& "','" & Request("strUpload") & "')")
Avatar billede axl_rose Nybegynder
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
%>
Avatar billede kalp Novice
18. november 2004 - 11:10 #64
tror den er lukket forkert.. kigger lige på det når jeg kommer hjem i aften.
Avatar billede kalp Novice
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") & "')"
Avatar billede kalp Novice
22. november 2004 - 11:37 #66
virker det?
Avatar billede kalp Novice
01. december 2004 - 17:03 #67
opgivet
Avatar billede axl_rose Nybegynder
01. december 2004 - 17:29 #68
Ja
Avatar billede axl_rose Nybegynder
01. december 2004 - 17:29 #69
Lavede den helt om
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester