Avatar billede fastpoint Nybegynder
26. juli 2002 - 11:01 Der er 18 kommentarer og
1 løsning

Fejl i mit script?

denne kode skulle gerne gå ind i databasen og ændre i tabellen fra nej til ja.... [dvs.. i databasen klikker man på jwringetoner for at åbne tabellen og så er der en fane der hedder [godkend]
kan i se fejlen?


<%option explicit%>

   
<%
    dim connection,id,SQLstringK

    Set Connection = Server.CreateObject("ADODB.Connection")
    Connection.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("../database.mdb")
   
    id    =        Trim(Request.QueryString("id"))
           
    SQLstringK="UPDATE jwringetoner SET godkendt='"&Request.QueryString("Ja")&"' WHERE id="&id
    Connection.Execute(SQLstringK)
    response.buffer=true
    response.clear
    response.redirect "godkend.asp"
    response.end
    %>
Avatar billede stig3 Mester
26. juli 2002 - 11:03 #1
En god ide er jo altid at skrive din SQL ud og se hvad du egentlig sender til databasen.
Avatar billede cape Nybegynder
26. juli 2002 - 11:03 #2
Hvad siger fejlen ?
Avatar billede stig3 Mester
26. juli 2002 - 11:04 #3
Hvis det er et true/false felt mener jeg ikke at der skal plinger om (')
Avatar billede tmceu Praktikant
26. juli 2002 - 11:07 #4
Du skal bruge true/false eller -1/0 uden pinger om for true/false værdier.
Avatar billede fastpoint Nybegynder
26. juli 2002 - 11:10 #5
dette script skal godkende ringetoner i databasen... hvis der ikke står ja i godkendt så kan man ikke se dem på siden.. den kommer ikke med nogen fejl... den skriver bare ikke noget som helst i feltet godkendt
Avatar billede fastpoint Nybegynder
26. juli 2002 - 11:12 #6
den her som jeg bruger i et mindre script virker fint...

<%option explicit%>

<%
    dim connection,id,SQLstringK

    Set Connection = Server.CreateObject("ADODB.Connection")
    Connection.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("../database.mdb")
   
    id    =        Trim(Request.QueryString("id"))
           
    SQLstringK="UPDATE data SET Approved=true WHERE id=" & id
    Connection.Execute(SQLstringK)
    response.buffer=true
    response.clear
    response.redirect "godkend.asp"
    response.end
    %>
Avatar billede tmceu Praktikant
26. juli 2002 - 11:15 #7
Prøv at ændre dit script til dette:

<%option explicit%>

   
<%
    dim connection,id,SQLstringK

    Set Connection = Server.CreateObject("ADODB.Connection")
    Connection.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("../database.mdb")
   
    id    =        Trim(Request.QueryString("id"))
           
    SQLstringK="UPDATE jwringetoner SET godkendt='"&Request.QueryString("Ja")&"' WHERE id="&id

    Response.Write "Querystring: " & Request.QueryString("Ja") & "<BR>"
    Response.Write "SQL statement: " & SQLstringK
    Response.End

    Connection.Execute(SQLstringK)
    response.buffer=true
    response.clear
    response.redirect "godkend.asp"
    response.end
    %>

Det udskriver værdien af feltet fra din querystring og det færdige SQL statement. Det kunne lyde som om eks. Request.QueryString("Ja") er tom.
Avatar billede fastpoint Nybegynder
26. juli 2002 - 11:18 #8
hmm det hjalp ikke.... jeg tjecker lige i database designet hvilket type datafelt det er...
Avatar billede mccannon Nybegynder
26. juli 2002 - 11:18 #9
jeg vil bakke op omkring tmceu <-- hvad pokker står det for ? ;)
Det virker altid når man bruger 1/0 værdier i en db når man bruge de der ja/nej true/false oplysninger
Avatar billede fastpoint Nybegynder
26. juli 2002 - 11:21 #10
det er et text felt ikke et Yes/No felt
Avatar billede cape Nybegynder
26. juli 2002 - 11:22 #11
Prøv nu det tmceu skriver.....
Avatar billede tmceu Praktikant
26. juli 2002 - 11:22 #12
Det er såmænd et navn jeg i sin tid måtte tage på AOL, da der var så mange der hed Thomas et eller andet. Det er en forkortelse af mit navn + postfixet med eu for Europa, da jeg primært bevægede mig i amerikanske kredse. Navnet er så hængt ved som mit generelle handle de fleste steder og man kan jo desværre ikke ændre handle herinde :-)
Avatar billede tmceu Praktikant
26. juli 2002 - 11:24 #13
Et tekstfelt skal omgives af pinger. Da du ikke får nogen syntaksfejl og ikke kan se noget i feltet, er jeg helt 100 på at Request.QueryString("ja") er tom. Dette vil nemlig give flg. statement der indsætter en blank værdi:

UPDATE jwringetoner SET godkendt='' WHERE id=XX
Avatar billede fastpoint Nybegynder
26. juli 2002 - 11:25 #14
jeg har ændret det til et Yes/No felt men jeg får denne fejl nu

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

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

/indsaet.asp, line 152



her er scriptet

<html>
<head>
<title>d</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link rel="stylesheet" href="styles.css" type="text/css">
</head>
<body bgcolor="#FFFFFF" text="#000000" link="#006699" vlink="#006699" alink="#006699">
<table border="0" width="700" bgcolor="#000000" cellspacing="1" cellpadding="0" align="center">
  <tr>
    <td width="100%" bgcolor="#FFFFFF" valign="top">
      <table width="100%" border="0" cellspacing="0" cellpadding="3">
        <tr bgcolor="#FFFFFF">
          <td width="50%"><font size="5"><b><font face="Verdana, Arial, Helvetica, sans-serif">JWRingelink
            1.0 ASP</font></b></font></td>
          <td align="right" valign="bottom" nowrap width="50%">
            <div align="right"></div>
          </td>
        </tr>
      </table>
    </td>
  </tr>
</table>
<table border='0' cellspacing='0' cellpadding='0' width='700' align="center" height="19">
  <tr>
    <td width='1' valign='top' bgcolor='#000000'><img src="images/intet.gif" width='1'></td>
    <td width='698' valign='top' bgcolor='#f7f7f7'>
      <table width="100%" border="0" cellspacing="4" cellpadding="0">
        <tr>
          <td width="59%"><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font size="2"><a href="index.asp">[
            Hjem</a> </font><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font size="2">|
            </font></b></font></b></font><font size="2"><a href="ringetoner.asp?alfa=ABCD">Ringetoner</a></font><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font size="2">
            </font><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font size="2">|
            </font></b></font></b></font></b></font></b></font></b></font><font size="2"><a href="topliste.asp">Top40</a></font><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font size="2">
            | </font><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font size="2"><a href="nye.asp">Nyeste</a></font><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font size="2">
            | </font></b></font></b></font></b></font></b></font></b></font></b></font></b></font></b></font></b></font></b></font></b></font></b></font></b></font></b></font></b></font></b></font></b></font></b></font></b></font></b></font></b></font></b></font></b></font></b></font></b></font><font size="2"><a href="indsaet.asp">Tilf&oslash;j
            </a></font><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font face="Verdana, Arial, Helvetica, sans-serif"><b><font size="2">|
            </font></b></font></b></font></b></font></b></font></b></font> <font size="2"><a href="admin/login.asp" target="_self">Admin
            </a> ]</font></b></font></b></font></b></font></b></font></b></font>
          </td>
          <td width="41%">
            <div align="right"><b></b></div>
          </td>
        </tr>
      </table>
    </td>
    <td width='1' valign='top' bgcolor='#000000'><img src="intet.gif" width='1'></td>
  </tr>
</table>
<table border="0" width="700" bgcolor="#000000" cellspacing="1" cellpadding="0" align="center">
  <tr>
    <td bgcolor="#FFFFFF" valign="top" colspan="2">
      <div align="center"><br>
        <form action="indsaet.asp" method="post">
          <table width="400" border="0" cellspacing="1" cellpadding="3" class="bottom" align="center" bgcolor="#f7f7f7">
            <tr>
              <td width="134"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Dit
                Navn <span class="rot"> <font color="#FF0000">*</font></span></font><br>
                <input type="text" name="navn" class="bottom">
              </td>
              <td width="251"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Email:</font><span class="rot"><br>
                <input type="text" name="email" class="bottom">
                </span></td>
            </tr>
            <tr>
              <td width="134"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Ringetonens
                Navn <span class="rot"> <font color="#FF0000">*</font></span></font><br>
                <input type="text" name="tonenavn" class="bottom">
              </td>
              <td width="251"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Tempo:</font><span class="rot"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><span class="rot"><font color="#FF0000">*</font></span></font><br>
                <select size="1" name="tempo" class="ramme" style="border: 1 solid #000000">
                  <option value="V&aelig;lge Selv" selected><span class="rot">For
                  Nokia</span></option>
                  <option value="40 BPM"><span class="rot">40 BPM</span></option>
                  <option value="45 BPM"><span class="rot">45 BPM</span></option>
                  <option value="50 BPM"><span class="rot">50 BPM</span></option>
                  <option value="56 BPM"><span class="rot">56 BPM</span></option>
                  <option value="63 BPM"><span class="rot">63 BPM</span></option>
                  <option value="70 BPM"><span class="rot">70 BPM</span></option>
                  <option value="80 BPM"><span class="rot">80 BPM</span></option>
                  <option value="90 BPM"><span class="rot">90 BPM</span></option>
                  <option value="100 BPM"><span class="rot">100 BPM</span></option>
                  <option value="112 BPM"><span class="rot">112 BPM</span></option>
                  <option value="125 BPM"><span class="rot">125 BPM</span></option>
                  <option value="140 BPM"><span class="rot">140 BPM</span></option>
                  <option value="160 BPM"><span class="rot">160 BPM</span></option>
                  <option value="180 BPM"><span class="rot">180 BPM</span></option>
                  <option value="200 BPM"><span class="rot">200 BPM</span></option>
                  <option value="225 BPM"><span class="rot">225 BPM</span></option>
                </select>
                </span></td>
            </tr>
            <tr>
              <td colspan="2" height="167"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
                Nokia<span class="rot"><font color="#FFFFFF"> <font color="#FF0000">*</font></font></span><font color="#FF0000">
                </font></font><font color="#FF0000"><br>
                </font>
                <textarea name="rnokia" cols="50" rows="8" class="bottom"></textarea>
              </td>
            </tr>
            <tr>
              <td colspan="2" height="167"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
                Siemens<span class="rot"><font color="#FFFFFF"> <font color="#FF0000">*</font></font></span><font color="#FF0000">
                </font></font><font color="#FF0000"><br>
                </font>
                <textarea name="rsiemens" cols="50" rows="8" class="bottom"></textarea>
              </td>
            </tr>
            <tr>
              <td colspan="2" height="167"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
                Ericsson<span class="rot"><font color="#FFFFFF"> <font color="#FF0000">*</font></font></span><font color="#FF0000">
                </font></font><font color="#FF0000"><br>
                </font>
                <textarea name="rericsson" cols="50" rows="8" class="bottom"></textarea>
              </td>
            </tr>
            <tr>
              <td colspan="2"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><span class="rot">
                </span></font>
                <table border="0" cellspacing="0" cellpadding="0" width="200">
                  <tr>
                    <td align="left">
                      <div align="left"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><span class="rot">
                        <font color="#FF0000">*</font></span><font color="#666666">
                        = Skal indtastes</font></font></div>
                    </td>
                  </tr>
                </table>
              </td>
            </tr>
          </table>
          <br>
          <table border="0" cellspacing="0" cellpadding="0" width="400">
            <tr>
              <td>
                <div align="center"><font face="Verdana, Arial, Helvetica, sans-serif"><b>
                  <input type="Submit" value="Tilf&oslash;j" name="Submit">
                  <input type="Reset" value="Slet Alt" name="Reset">
                      </b></font></div>
              </td>
            </tr>
          </table>
          </form>
<%
If Trim(Request("navn")) > "" Then
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("database.mdb")
Conn.Open DSN
if request("navn") = "" OR request("tonenavn") ="" OR request("tempo") ="" OR request("rsiemens")="" OR request("rericsson")="" then
response.write("Du mangler at indtaste en oplysning")
else
Conn.Execute "INSERT INTO jwringetoner (navn,email,tonenavn,tempo,rnokia,rsiemens,rericsson,hits,godkendt,kl,dato,ip) VALUES ('" & Request("navn") & "','" & Request("email") & "','" & Request("tonenavn") & "','" & Request("tempo") & "','" & Request("rnokia") & "','" & Request("rsiemens") & "','" & Request("rericsson") & "','0','Nej','" & time() & "','" & date() & "','" & Request("REMOTE_ADDR") & "')"

Conn.Close: Set Conn = Nothing

Response.Write "<h1>Tak for din ringetone - din ringetone er blevet sat til at blive accept hos webmasteren!</h1>"
%>
<% End If %>
<% end if %>

<p>

        <p>&nbsp;
      </div>
    </td>
  </tr>
</table>
Avatar billede mccannon Nybegynder
26. juli 2002 - 11:29 #15
ændre det til et talfelt
brug 1 og 0 som værdi

1 kunne være = ja når du henter de ud fra db'en og 0 kunen være = nej når du henter det ud
det samme når du sætter det ind i db'en
Avatar billede tmceu Praktikant
26. juli 2002 - 11:32 #16
Prøv med denne efter du har ændret datatype:

Conn.Execute "INSERT INTO jwringetoner (navn,email,tonenavn,tempo,rnokia,rsiemens,rericsson,hits,godkendt,kl,dato,ip) VALUES ('" & Request("navn") & "','" & Request("email") & "','" & Request("tonenavn") & "','" & Request("tempo") & "','" & Request("rnokia") & "','" & Request("rsiemens") & "','" & Request("rericsson") & "','0',false,'" & time() & "','" & date() & "','" & Request("REMOTE_ADDR") & "')"

false skal evt. erstattes af 0
Avatar billede fastpoint Nybegynder
26. juli 2002 - 11:58 #17
okay jeg har ændret det til number nu... men når jeg ændre "JA" til "1" så virker siden ikke... skal jeg ændre på scriptet nu hvor jeg har lavet om i databasen?

<%option explicit%>

   
<%
    dim connection,id,SQLstringK

    Set Connection = Server.CreateObject("ADODB.Connection")
    Connection.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("../database.mdb")
   
    id    =        Trim(Request.QueryString("id"))
           
    SQLstringK="UPDATE jwringetoner SET godkendt='"&Request.QueryString("Ja")&"' WHERE id=" & id
    Connection.Execute(SQLstringK)
    response.buffer=true
    response.clear
    response.redirect "godkend.asp"
    response.end
    %>
Avatar billede tmceu Praktikant
26. juli 2002 - 12:00 #18
Du skal ikke bruge pinger om nummeriske felter, så prøv med denne:

SQLstringK="UPDATE jwringetoner SET godkendt="&Request.QueryString("Ja")&" WHERE id=" & id
Avatar billede fastpoint Nybegynder
26. juli 2002 - 12:04 #19
<%option explicit%>

   
<%
    dim connection,id,SQLstringK

    Set Connection = Server.CreateObject("ADODB.Connection")
    Connection.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("../database.mdb")
   
    id    =        Trim(Request.QueryString("id"))
           
    SQLstringK="UPDATE jwringetoner SET godkendt=(1) WHERE id=" & id
    Connection.Execute(SQLstringK)
    response.buffer=true
    response.clear
    response.redirect "godkend.asp"
    response.end
    %>
   



jeg fik det til at virke med den kode der... tak for hjælpen alle sammen!
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