Avatar billede gallagher Nybegynder
08. maj 2003 - 13:52 Der er 29 kommentarer og
2 løsninger

Rma Formular (hjælp)

Jeg har fået lavet denne RMA formular her på Eksperten men kan ikke få den til at virke...
Jeg bruger Acesse db til at gemme oplysningerne i.

--- rma.asp ----

<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Ny side 1</title>
</head>

<body>

<form method="POST" action="rma_opret.asp">
  <p align="center"><b><font size="5">RMA</font></b></p>
  <p align="center">&nbsp;</p>
  <p align="center"><font size="2">Alle felter mærket * skal udfyldes.</font></p>
  <p>&nbsp;</p>
  <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="569" id="AutoNumber2" height="295">
    <tr>
      <td height="22" width="149">&nbsp;</td>
      <td height="22" colspan="2" width="247">&nbsp;</td>
      <td height="22" width="173">&nbsp;</td>
    </tr>
    <tr>
      <td height="22" width="149"><b><font face="Verdana" size="3">&nbsp;
      Fakturanr:</font></b></td>
      <td height="22" colspan="2" width="247"><font face="Verdana" size="3"><b>
      <input type="text" name="Fakturanr" size="20">*</b></font></td>
      <td height="22" width="173">&nbsp;</td>
    </tr>
    <tr>
      <td height="13" width="149"></td>
      <td height="13" colspan="2" width="247"></td>
      <td height="13" width="173"></td>
    </tr>
    <tr>
      <td height="22" width="149"><b><font face="Verdana" size="3">&nbsp; Firma:</font></b></td>
      <td height="22" colspan="2" width="247">
      <input type="text" name="Firma" size="20"></td>
      <td height="22" width="173">&nbsp;</td>
    </tr>
    <tr>
      <td height="22" width="149"><b><font face="Verdana" size="3">&nbsp; Navn:</font></b></td>
      <td height="22" colspan="2" width="247"><font face="Verdana" size="3"><b>
      <input type="text" name="Navn" size="20">*</b></font></td>
      <td height="22" width="173">&nbsp;</td>
    </tr>
    <tr>
      <td height="20" width="149"><b><font face="Verdana" size="3">&nbsp;
      Adresse:</font></b></td>
      <td height="20" colspan="2" width="247"><font face="Verdana" size="3"><b>
      <input type="text" name="Adresse" size="20">*</b></font></td>
      <td height="20" width="173">&nbsp;</td>
    </tr>
    <tr>
      <td height="23" width="149"><b><font face="Verdana" size="3">&nbsp;
      Postnr:</font></b></td>
      <td height="23" colspan="2" width="247"><font face="Verdana" size="3"><b>
      <input type="text" name="Postnr" size="20">*</b></font></td>
      <td height="23" width="173">&nbsp;</td>
    </tr>
    <tr>
      <td height="13" width="149"><b><font face="Verdana" size="3">&nbsp; By:</font></b></td>
      <td height="13" colspan="2" width="247"><font face="Verdana" size="3"><b>
      <input type="text" name="Bynavn" size="20">*</b></font></td>
      <td height="13" width="173"></td>
    </tr>
    <tr>
      <td height="14" width="149"><b><font face="Verdana" size="3">&nbsp; Email:</font></b></td>
      <td height="14" colspan="2" width="247"><font face="Verdana" size="3"><b>
      <input type="text" name="Email" size="20">*</b></font></td>
      <td height="14" width="173"></td>
    </tr>
    <tr>
      <td height="13" width="149"><b><font face="Verdana" size="3">&nbsp;
      Telefonnr:</font></b></td>
      <td height="13" colspan="2" width="247"><font face="Verdana" size="3"><b>
      <input type="text" name="Telefonnr" size="20">*</b></font></td>
      <td height="13" width="173"></td>
    </tr>
    <tr>
      <td height="13" width="149"></td>
      <td height="13" colspan="2" width="247"></td>
      <td height="13" width="173"></td>
    </tr>
    <tr>
      <td height="13" width="149"><b><font face="Verdana" size="3"><br>
&nbsp; Varenavn:</font></b></td>
      <td height="13" width="162"><font face="Verdana" size="2">Eks. &quot;Nokia&quot;</font><b><font face="Verdana" size="3"><br>
      <input type="text" name="Varenavn" size="20">*&nbsp;
      </font></b></td>
      <td height="13" width="85"><b><font face="Verdana" size="3">&nbsp; <br>
&nbsp;&nbsp; Model:</font></b></td>
      <td height="13" width="173"><font size="2">Eks. &quot;7650&quot;</font><font size="3"><b><br>
      <input type="text" name="Model" size="20">*</b></font></td>
    </tr>
    <tr>
      <td height="13" width="149"></td>
      <td height="13" colspan="2" width="247"></td>
      <td height="13" width="173"></td>
    </tr>
    <tr>
      <td height="13" width="149"><b><font face="Verdana" size="3">&nbsp;
      Serienummer:</font></b></td>
      <td height="13" colspan="2" width="247"><font face="Verdana" size="3"><b>
      <input type="text" name="Serienr" size="20"></b></font></td>
      <td height="13" width="173"></td>
    </tr>
    <tr>
      <td height="13" width="149"></td>
      <td height="13" colspan="2" width="247"></td>
      <td height="13" width="173"></td>
    </tr>
    <tr>
      <td height="13" colspan="4" width="569">&nbsp;<p><b>
      <font face="Verdana" size="3">&nbsp; Fejlbeskrivelse:<br>
&nbsp;</font></b></p>
      <p><font face="Verdana" size="3"><b>&nbsp;
      <textarea rows="10" name="Fejlbeskrivelse" cols="65"></textarea>*</b></font></td>
    </tr>
    <tr>
      <td height="12" width="149"></td>
      <td height="12" colspan="2" width="247"></td>
      <td height="12" width="173"></td>
    </tr>
  </table>
  <p align="center"><input type="submit" value="Opret RMA" name="Send">
  <input type="reset" value="Slet alt" name="Slet"></p>
  <p align="center">&nbsp;</p>
  <p align="center">&nbsp;</p>
</form>

</body></html>

--- rma.asp

-- rma_opret.asp ---

<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Ny side 1</title>
</head>

<body>

<%
set dbCon = CreateObject("ADODB.Connection")
dbCon.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db.mdb")
sql = "INSERT INTO Tbl (Fakturanr,Firma,Navn,Adresse,Postnr,Bynavn,EMail,Tlf,Varenavn,Model,Serienummer,Fejlbeskrivelse) VALUES ("
sql = sql & Request.Form("Fakturanr")
sql = sql & Request.Form("Navn")
sql = sql & Request.Form("Adresse")
sql = sql & Request.Form("Postnr")
sql = sql & Request.Form("Bynavn")
sql = sql & Request.Form("EMail")
sql = sql & Request.Form("Tlf")
sql = sql & Request.Form("Varenavn")
sql = sql & Request.Form("Model")
sql = sql & Request.Form("Serienummer")
sql = sql & Request.Form("Fejlbeskrivelse")
set resultat = dbCon.Execute(sql)

'Og hent den sidste nye i DB'en

sql = "SELECT RMA_ID FROM Tbl WHERE Fakturanr=" & Request.Form("Fakturanr")
set resultat = dbCon.Execute(sql)
%>


<%
        msg.From = "webmaster@dotk.dk"
        msg.FromName = "Rma"

        ' Note that as addRecipient is method and not
        ' a property, we do not use an equals ( = ) sign
        msg.AddRecipient "ken.k@mail.dk", "Kenneth Kristensen"

    ' The subject of the message
        msg.Subject = "Rma."

        'add every form element and its value to the email
        Msg.HTMLBody = "<html><body>"
        Msg.AppendHTML ("<table cols='2' border='1'>")
        Msg.AppendHTML ("<TR><TD width='130'>RMA ID<TD>" & Resultat("RMA_ID"))
        Msg.AppendHTML ("<TR><TD width='130'>Fakturanr<TD>" & Resultat("Fakturanr"))
        Msg.AppendHTML ("<TR><TD>Firma<TD>" & Resultat("Firma"))
        Msg.AppendHTML ("<TR><TD width='130'>Navn<TD>" & Resultat("Navn"))
        Msg.AppendHTML ("<TR><TD width='130'>Adresse<TD>" & Resultat("Adresse"))
        Msg.AppendHTML ("<TR><TD width='130'>Postnr & By<TD>" & Resultat("Postnr") & " " & Resultat("Bynavn"))
        Msg.AppendHTML ("<TR><TD width='130'>EMail<TD>" & Resultat("EMail"))
        Msg.AppendHTML ("<TR><TD width='130'>Telefonnr<TD>" & Resultat("Telefonnr"))
        Msg.AppendHTML ("<TR><TD width='130'>Varenavn<TD>" & Resultat("Varenavn"))
        Msg.AppendHTML ("<TR><TD width='130'>Modelnr<TD>" & Resultat("Modelnr"))
        Msg.AppendHTML ("<TR><TD width='130'>Serienr<TD>" & Resultat("Serienr"))
        Msg.AppendHTML ("<TR><TD width='130'>Fejlbeskriv<TD>" & Resultat("Fejlbeskrivelse"))
        Msg.AppendHTML ("</table><BR><BR>")
        Msg.AppendHTML ("</body></html>")
        ' Now send the message, using the indicated mailserver
        if not msg.Send("mail.domain.dk" ) then
        Response.write "<pre>" & msg.log & "</pre>"
            Response.End
        else
            Response.write "Message sent succesfully!"
        end if
                ' Her sletter den Recipients og tilføjer kunden
                Message.ClearRecipients
        msg.AddRecipient Resultat("EMail"), Resultat("Navn")
        ' Now send the message again, using the indicated mailserver
        if not msg.Send("mail.domain.dk" ) then
        Response.write "<pre>" & msg.log & "</pre>"
            Response.End
        else
            Response.write "Message sent succesfully!"
        end if
%>
</body>

</html>

--- rma_opret.asp ---

Men når jeg kører det får jeg denne fejl???

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

[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression '2345KennethBonnesensgade 119000Aalborgk.k@jubiimail.dkBundkortAJA 2Dette virker ikke som det skal'.

/rma/rma_opret.asp, line 27


Håber at i kan hjælpe

Gallagher
Avatar billede jpvj Nybegynder
08. maj 2003 - 13:55 #1
Lige under din body laver du en SQL INSERT INTO...

Du glemmer at adskille dine data med komma og desuden skal tekststrenge være omgrænset af pinger.

Fejlen "'2345KennethBonnesensgade 119000Aalborgk.k@jubiimail.dkBundkortAJA 2Dette virker ikke som det skal'" viser jo netop problemer, da den prøver at indsætte 1 værdi i stedet for de ca. 10 felter (hvilket skyldes manglende omgræsning og kommaer.

JP
Avatar billede gallagher Nybegynder
08. maj 2003 - 13:56 #2
ok hvordan, jeg er rimelig ny indenfor ASP
Avatar billede eagleeye Praktikant
08. maj 2003 - 13:57 #3
Hvis du dine felter er tekst kolonner skal der ' omkirng i SQLen, samt der mangler , mellem de enktet i VALUES delen

Eks:

sql = "INSERT INTO Tbl (Fakturanr,Firma,Navn,Adresse,Postnr,Bynavn,EMail,Tlf,Varenavn,Model,Serienummer,Fejlbeskrivelse) VALUES ("
sql = sql & Request.Form("Fakturanr") & ", "
sql = sql & "'" & Request.Form("Navn") & "',"

osv...
Avatar billede jpvj Nybegynder
08. maj 2003 - 13:57 #4
(Fakturanr,Firma,Navn,Adresse,Postnr,Bynavn,EMail,Tlf,Varenavn,Model,Serienummer,Fejlbeskrivelse) VALUES ("
sql = sql & Request.Form("Fakturanr")
sql = sql & Request.Form("Navn")
sql = sql & Request.Form("Adresse")
sql = sql & Request.Form("Postnr")
sql = sql & Request.Form("Bynavn")
sql = sql & Request.Form("EMail")
sql = sql & Request.Form("Tlf")
sql = sql & Request.Form("Varenavn")
sql = sql & Request.Form("Model")
sql = sql & Request.Form("Serienummer")
sql = sql & Request.Form("Fejlbeskrivelse")

Rettes til noget i stil med (hvis vi antager at alle felter er VARCHAR eller lign:

(Fakturanr,Firma,Navn,Adresse,Postnr,Bynavn,EMail,Tlf,Varenavn,Model,Serienummer,Fejlbeskrivelse) VALUES ("
sql = sql & "'" & Request.Form("Fakturanr") & "', "
sql = sql & "'" & Request.Form("Navn") & "', "
sql = sql & "'" & Request.Form("Adresse") & "', "
sql = sql & "'" & Request.Form("Postnr") & "', "
sql = sql & "'" & Request.Form("Bynavn") & "', "
sql = sql & "'" & Request.Form("EMail") & "', "
sql = sql & "'" & Request.Form("Tlf") & "', "
sql = sql & "'" & Request.Form("Varenavn") & "', "
sql = sql & "'" & Request.Form("Model") & "', "
sql = sql & "'" & Request.Form("Serienummer") & "', "
sql = sql & "'" & Request.Form("Fejlbeskrivelse") & "'"
Avatar billede gallagher Nybegynder
08. maj 2003 - 13:57 #5
er det i body-delen i rma.asp det skal oprettes
Avatar billede jpvj Nybegynder
08. maj 2003 - 13:58 #6
Ja - lige under.
Avatar billede gallagher Nybegynder
08. maj 2003 - 13:59 #7
ok, det prøver jeg
Avatar billede gallagher Nybegynder
08. maj 2003 - 14:11 #8
nu har jeg sat dette i rma.asp lige under <body> ---

<%
set dbCon = CreateObject("ADODB.Connection")
dbCon.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db.mdb")
sql = "INSERT INTO Tbl (Fakturanr,Firma,Navn,Adresse,Postnr,Bynavn,EMail,Tlf,Varenavn,Model,Serienummer,Fejlbeskrivelse)
%>

Men den laver stadig denne fejl:

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

[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression '2345', admin''.

/rma/rma_opret.asp, line 27
Avatar billede jpvj Nybegynder
08. maj 2003 - 14:16 #9
Hvorfor?! :-)

Ret jf. det jeg skrev og post resultatet her, hvis det ikke virker. Lige nu sender du en halv SQL INSERT af sted.
Avatar billede gallagher Nybegynder
08. maj 2003 - 14:18 #10
ok her er det :-)

--- rma.asp ---

<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Ny side 1</title>
</head>

<body>
<%
set dbCon = CreateObject("ADODB.Connection")
dbCon.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db.mdb")
sql = "INSERT INTO Tbl (Fakturanr,Firma,Navn,Adresse,Postnr,Bynavn,EMail,Tlf,Varenavn,Model,Serienummer,Fejlbeskrivelse)
%>

<form method="POST" action="rma_opret.asp">
  <p align="center"><b><font size="5">RMA</font></b></p>
  <p align="center">&nbsp;</p>
  <p align="center"><font size="2">Alle felter mærket * skal udfyldes.</font></p>
  <p>&nbsp;</p>
  <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="569" id="AutoNumber2" height="295">
    <tr>
      <td height="22" width="149">&nbsp;</td>
      <td height="22" colspan="2" width="247">&nbsp;</td>
      <td height="22" width="173">&nbsp;</td>
    </tr>
    <tr>
      <td height="22" width="149"><b><font face="Verdana" size="3">&nbsp;
      Fakturanr:</font></b></td>
      <td height="22" colspan="2" width="247"><font face="Verdana" size="3"><b>
      <input type="text" name="Fakturanr" size="20">*</b></font></td>
      <td height="22" width="173">&nbsp;</td>
    </tr>
    <tr>
      <td height="13" width="149"></td>
      <td height="13" colspan="2" width="247"></td>
      <td height="13" width="173"></td>
    </tr>
    <tr>
      <td height="22" width="149"><b><font face="Verdana" size="3">&nbsp; Firma:</font></b></td>
      <td height="22" colspan="2" width="247">
      <input type="text" name="Firma" size="20"></td>
      <td height="22" width="173">&nbsp;</td>
    </tr>
    <tr>
      <td height="22" width="149"><b><font face="Verdana" size="3">&nbsp; Navn:</font></b></td>
      <td height="22" colspan="2" width="247"><font face="Verdana" size="3"><b>
      <input type="text" name="Navn" size="20">*</b></font></td>
      <td height="22" width="173">&nbsp;</td>
    </tr>
    <tr>
      <td height="20" width="149"><b><font face="Verdana" size="3">&nbsp;
      Adresse:</font></b></td>
      <td height="20" colspan="2" width="247"><font face="Verdana" size="3"><b>
      <input type="text" name="Adresse" size="20">*</b></font></td>
      <td height="20" width="173">&nbsp;</td>
    </tr>
    <tr>
      <td height="23" width="149"><b><font face="Verdana" size="3">&nbsp;
      Postnr:</font></b></td>
      <td height="23" colspan="2" width="247"><font face="Verdana" size="3"><b>
      <input type="text" name="Postnr" size="20">*</b></font></td>
      <td height="23" width="173">&nbsp;</td>
    </tr>
    <tr>
      <td height="13" width="149"><b><font face="Verdana" size="3">&nbsp; By:</font></b></td>
      <td height="13" colspan="2" width="247"><font face="Verdana" size="3"><b>
      <input type="text" name="Bynavn" size="20">*</b></font></td>
      <td height="13" width="173"></td>
    </tr>
    <tr>
      <td height="14" width="149"><b><font face="Verdana" size="3">&nbsp; Email:</font></b></td>
      <td height="14" colspan="2" width="247"><font face="Verdana" size="3"><b>
      <input type="text" name="Email" size="20">*</b></font></td>
      <td height="14" width="173"></td>
    </tr>
    <tr>
      <td height="13" width="149"><b><font face="Verdana" size="3">&nbsp;
      Telefonnr:</font></b></td>
      <td height="13" colspan="2" width="247"><font face="Verdana" size="3"><b>
      <input type="text" name="Telefonnr" size="20">*</b></font></td>
      <td height="13" width="173"></td>
    </tr>
    <tr>
      <td height="13" width="149"></td>
      <td height="13" colspan="2" width="247"></td>
      <td height="13" width="173"></td>
    </tr>
    <tr>
      <td height="13" width="149"><b><font face="Verdana" size="3"><br>
&nbsp; Varenavn:</font></b></td>
      <td height="13" width="162"><font face="Verdana" size="2">Eks. &quot;Nokia&quot;</font><b><font face="Verdana" size="3"><br>
      <input type="text" name="Varenavn" size="20">*&nbsp;
      </font></b></td>
      <td height="13" width="85"><b><font face="Verdana" size="3">&nbsp; <br>
&nbsp;&nbsp; Model:</font></b></td>
      <td height="13" width="173"><font size="2">Eks. &quot;7650&quot;</font><font size="3"><b><br>
      <input type="text" name="Model" size="20">*</b></font></td>
    </tr>
    <tr>
      <td height="13" width="149"></td>
      <td height="13" colspan="2" width="247"></td>
      <td height="13" width="173"></td>
    </tr>
    <tr>
      <td height="13" width="149"><b><font face="Verdana" size="3">&nbsp;
      Serienummer:</font></b></td>
      <td height="13" colspan="2" width="247"><font face="Verdana" size="3"><b>
      <input type="text" name="Serienr" size="20"></b></font></td>
      <td height="13" width="173"></td>
    </tr>
    <tr>
      <td height="13" width="149"></td>
      <td height="13" colspan="2" width="247"></td>
      <td height="13" width="173"></td>
    </tr>
    <tr>
      <td height="13" colspan="4" width="569">&nbsp;<p><b>
      <font face="Verdana" size="3">&nbsp; Fejlbeskrivelse:<br>
&nbsp;</font></b></p>
      <p><font face="Verdana" size="3"><b>&nbsp;
      <textarea rows="10" name="Fejlbeskrivelse" cols="65"></textarea>*</b></font></td>
    </tr>
    <tr>
      <td height="12" width="149"></td>
      <td height="12" colspan="2" width="247"></td>
      <td height="12" width="173"></td>
    </tr>
  </table>
  <p align="center"><input type="submit" value="Opret RMA" name="Send">
  <input type="reset" value="Slet alt" name="Slet"></p>
  <p align="center">&nbsp;</p>
  <p align="center">&nbsp;</p>
</form>

</body></html>


--- rma_opret.asp ---

<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Ny side 1</title>
</head>

<body>

<%
set dbCon = CreateObject("ADODB.Connection")
dbCon.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db.mdb")
sql = "INSERT INTO Tbl (Fakturanr,Firma,Navn,Adresse,Postnr,Bynavn,EMail,Tlf,Varenavn,Model,Serienummer,Fejlbeskrivelse) VALUES ("
sql = sql & Request.Form("Fakturanr") & "', "
sql = sql & Request.Form("Navn") & "', "
sql = sql & Request.Form("Adresse") & "', "
sql = sql & Request.Form("Postnr") & "', " 
sql = sql & Request.Form("Bynavn") & "', "
sql = sql & Request.Form("EMail") & "', "
sql = sql & Request.Form("Tlf") & "', "
sql = sql & Request.Form("Varenavn") & "', "
sql = sql & Request.Form("Model") & "', "
sql = sql & Request.Form("Serienummer") & "', "
sql = sql & Request.Form("Fejlbeskrivelse") & "'"
set resultat = dbCon.Execute(sql)

'Og hent den sidste nye i DB'en

sql = "SELECT RMA_ID FROM Tbl WHERE Fakturanr=" & Request.Form("Fakturanr")
set resultat = dbCon.Execute(sql)
%>


<%
        msg.From = "webmaster@dotk.dk"
        msg.FromName = "Rma"

        ' Note that as addRecipient is method and not
        ' a property, we do not use an equals ( = ) sign
        msg.AddRecipient "ken.k@mail.dk", "Kenneth Kristensen"

    ' The subject of the message
        msg.Subject = "Rma."

        'add every form element and its value to the email
        Msg.HTMLBody = "<html><body>"
        Msg.AppendHTML ("<table cols='2' border='1'>")
        Msg.AppendHTML ("<TR><TD width='130'>RMA ID<TD>" & Resultat("RMA_ID"))
        Msg.AppendHTML ("<TR><TD width='130'>Fakturanr<TD>" & Resultat("Fakturanr"))
        Msg.AppendHTML ("<TR><TD>Firma<TD>" & Resultat("Firma"))
        Msg.AppendHTML ("<TR><TD width='130'>Navn<TD>" & Resultat("Navn"))
        Msg.AppendHTML ("<TR><TD width='130'>Adresse<TD>" & Resultat("Adresse"))
        Msg.AppendHTML ("<TR><TD width='130'>Postnr & By<TD>" & Resultat("Postnr") & " " & Resultat("Bynavn"))
        Msg.AppendHTML ("<TR><TD width='130'>EMail<TD>" & Resultat("EMail"))
        Msg.AppendHTML ("<TR><TD width='130'>Telefonnr<TD>" & Resultat("Telefonnr"))
        Msg.AppendHTML ("<TR><TD width='130'>Varenavn<TD>" & Resultat("Varenavn"))
        Msg.AppendHTML ("<TR><TD width='130'>Modelnr<TD>" & Resultat("Modelnr"))
        Msg.AppendHTML ("<TR><TD width='130'>Serienr<TD>" & Resultat("Serienr"))
        Msg.AppendHTML ("<TR><TD width='130'>Fejlbeskriv<TD>" & Resultat("Fejlbeskrivelse"))
        Msg.AppendHTML ("</table><BR><BR>")
        Msg.AppendHTML ("</body></html>")
        ' Now send the message, using the indicated mailserver
        if not msg.Send("mail.domain.dk" ) then
        Response.write "<pre>" & msg.log & "</pre>"
            Response.End
        else
            Response.write "Message sent succesfully!"
        end if
                ' Her sletter den Recipients og tilføjer kunden
                Message.ClearRecipients
        msg.AddRecipient Resultat("EMail"), Resultat("Navn")
        ' Now send the message again, using the indicated mailserver
        if not msg.Send("mail.domain.dk" ) then
        Response.write "<pre>" & msg.log & "</pre>"
            Response.End
        else
            Response.write "Message sent succesfully!"
        end if
%>
</body>

</html>
Avatar billede eagleeye Praktikant
08. maj 2003 - 14:21 #11
Der mangler en ) til sidst.:


sql = "INSERT INTO Tbl (Fakturanr,Firma,Navn,Adresse,Postnr,Bynavn,EMail,Tlf,Varenavn,Model,Serienummer,Fejlbeskrivelse) VALUES ("
sql = sql & Request.Form("Fakturanr") & "', "
sql = sql & Request.Form("Navn") & "', "
sql = sql & Request.Form("Adresse") & "', "
sql = sql & Request.Form("Postnr") & "', " 
sql = sql & Request.Form("Bynavn") & "', "
sql = sql & Request.Form("EMail") & "', "
sql = sql & Request.Form("Tlf") & "', "
sql = sql & Request.Form("Varenavn") & "', "
sql = sql & Request.Form("Model") & "', "
sql = sql & Request.Form("Serienummer") & "', "
sql = sql & Request.Form("Fejlbeskrivelse") & "')"
Avatar billede gallagher Nybegynder
08. maj 2003 - 14:26 #12
jeg fatter det ikke rigtigt, den laver den samme fejl...Det du skrev >>eagleeye<< det skal skrives i rma_opret ikke
Avatar billede eagleeye Praktikant
08. maj 2003 - 14:31 #13
Ja er din SQL sætning du skal rette.
For vi kan lave den bedre hjælpe med SQL kan du så ikke skrive hvilken type de forskellige kolonner er?

For hvis en kolonne er af typen tal så skal der ikke ' omkring i SQL sætningen som ved teskt. Eksvis hvis Fakturanr er af typen tal skal det se sådan her ud i SQL sætningen:

sql = "INSERT INTO Tbl (Fakturanr,Firma,Navn,Adresse,Postnr,Bynavn,EMail,Tlf,Varenavn,Model,Serienummer,Fejlbeskrivelse) VALUES ("
sql = sql & Request.Form("Fakturanr") & ", "
sql = sql & "'" & Request.Form("Navn") & "', "
Avatar billede eagleeye Praktikant
08. maj 2003 - 14:32 #14
Du har ikke fået alle sstat 'erne med

Prøv med denn SQL sætning:


sql = "INSERT INTO Tbl (Fakturanr,Firma,Navn,Adresse,Postnr,Bynavn,EMail,Tlf,Varenavn,Model,Serienummer,Fejlbeskrivelse) VALUES ("
sql = sql & "'" & Request.Form("Fakturanr") & "', "
sql = sql & "'" & Request.Form("Navn") & "', "
sql = sql & "'" & Request.Form("Adresse") & "', "
sql = sql & "'" & Request.Form("Postnr") & "', " 
sql = sql & "'" & Request.Form("Bynavn") & "', "
sql = sql & "'" & Request.Form("EMail") & "', "
sql = sql & "'" & Request.Form("Tlf") & "', "
sql = sql & "'" & Request.Form("Varenavn") & "', "
sql = sql & "'" & Request.Form("Model") & "', "
sql = sql & "'" & Request.Form("Serienummer") & "', "
sql = sql & "'" & Request.Form("Fejlbeskrivelse") & "')"
Avatar billede gallagher Nybegynder
08. maj 2003 - 14:32 #15
kan jeg ikke sende db til dig så du kan se den
Avatar billede gallagher Nybegynder
08. maj 2003 - 14:41 #16
den laver nu denne fejl

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

[Microsoft][ODBC Microsoft Access Driver] Number of query values and destination fields are not the same.

/rma/rma_opret.asp, line 27
Avatar billede gallagher Nybegynder
08. maj 2003 - 14:42 #17
her er indholdet i db´en

[Feltnavn]      [Felttype]
RMA_ID ......... autonum/primary
Fakturanr ...... tal
Firma .......... tekst
Navn ........... tekst
Adresse ........ tekst
Postnr ......... tal
Bynavn ......... tekst
EMail .......... tekst
Tlf ............ tal
Varenavn ....... tekst
Model .......... tekst
Serienummer .... tekst
Fejlbeskrivelse  notat
Avatar billede eagleeye Praktikant
08. maj 2003 - 14:43 #18
Så prøv med denne SQL:


sql = "INSERT INTO Tbl (Fakturanr,Firma,Navn,Adresse,Postnr,Bynavn,EMail,Tlf,Varenavn,Model,Serienummer,Fejlbeskrivelse) VALUES ("
sql = sql & Request.Form("Fakturanr") & ", "
sql = sql & "'" & Request.Form("Navn") & "', "
sql = sql & "'" & Request.Form("Adresse") & "', "
sql = sql & Request.Form("Postnr") & ", " 
sql = sql & "'" & Request.Form("Bynavn") & "', "
sql = sql & "'" & Request.Form("EMail") & "', "
sql = sql & Request.Form("Tlf") & ", "
sql = sql & "'" & Request.Form("Varenavn") & "', "
sql = sql & "'" & Request.Form("Model") & "', "
sql = sql & "'" & Request.Form("Serienummer") & "', "
sql = sql & "'" & Request.Form("Fejlbeskrivelse") & "')"
Avatar billede jpvj Nybegynder
08. maj 2003 - 14:45 #19
... og så er vi vist tilbage til mig første indlæg :-)
Avatar billede eagleeye Praktikant
08. maj 2003 - 14:47 #20
På  ingen måde du havde ' omkring dem alle.
Avatar billede eagleeye Praktikant
08. maj 2003 - 14:47 #21
Hvis man tager eksvis Tlf og du tillader at man ikke indtaster det så kan man ikke ligge en tom streng ind i tal kolonnnen. Det skal være tallet 0 man ligger ind.

Så jeg vil anbefale at hvade kolonner som tlf og postnr som tekst da det er lettere at styre.
Avatar billede gallagher Nybegynder
08. maj 2003 - 14:48 #22
det havde jeg også prøvet, men giver denne fejl :-)

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

[Microsoft][ODBC Microsoft Access Driver] Syntax error in INSERT INTO statement.

/rma/rma_opret.asp, line 27
Avatar billede eagleeye Praktikant
08. maj 2003 - 14:49 #23
Hvis der er nogle felter som ikke skal udfyldes skal du i Access for hver Kolonne sætte disse for alle tekst/notat felter:
Obligatorisk : Nej
Tilladnullængde : Ja
Avatar billede gallagher Nybegynder
08. maj 2003 - 14:49 #24
det vil sige at det hele skal være tekst i db
Avatar billede eagleeye Praktikant
08. maj 2003 - 14:52 #25
Ikke den kolonne som er autonummer den skal stadig være autonummer.
De andre syntes jeg du skal overveje at ændre til teskt i hvert tilfælde Tlf og postnr.


Der manger Request.Form("firma") i VALUE delen.:


sql = "INSERT INTO Tbl (Fakturanr,Firma,Navn,Adresse,Postnr,Bynavn,EMail,Tlf,Varenavn,Model,Serienummer,Fejlbeskrivelse) VALUES ("
sql = sql & Request.Form("Fakturanr") & ", "
sql = sql & "'" & Request.Form("Firma") & "', "
sql = sql & "'" & Request.Form("Navn") & "', "
sql = sql & "'" & Request.Form("Adresse") & "', "
sql = sql & Request.Form("Postnr") & ", " 
sql = sql & "'" & Request.Form("Bynavn") & "', "
sql = sql & "'" & Request.Form("EMail") & "', "
sql = sql & Request.Form("Tlf") & ", "
sql = sql & "'" & Request.Form("Varenavn") & "', "
sql = sql & "'" & Request.Form("Model") & "', "
sql = sql & "'" & Request.Form("Serienummer") & "', "
sql = sql & "'" & Request.Form("Fejlbeskrivelse") & "')"
Avatar billede gallagher Nybegynder
08. maj 2003 - 14:57 #26
nu er det oprettet i db og firma er indført, men den laver stadig denne fejl..

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

[Microsoft][ODBC Microsoft Access Driver] Syntax error in INSERT INTO statement.

/rma/rma_opret.asp, line 27

Det er underligt :o)
Avatar billede gallagher Nybegynder
08. maj 2003 - 15:36 #27
Jeg takker for hjælpen, og prøver at finde en anden løsning. Jeg giver jer begge point, som tak for den hjælp i har givet.
Håber at det er ok
Avatar billede larsen Nybegynder
08. maj 2003 - 17:53 #28
gallagher>>Hvis du vil kan du prøve at sende DB'en til mig, så skal jeg kigge på den :-)
Ulrik@Saxonet.dk
Avatar billede gallagher Nybegynder
08. maj 2003 - 21:58 #29
ok - det prøver jeg
Avatar billede larsen Nybegynder
10. maj 2003 - 20:34 #30
Virker det ??
Avatar billede intercode Nybegynder
13. november 2003 - 00:14 #31
fik i det til at virke ?
jeg har interesse i sådan et script selv !
tak !!
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