Avatar billede mitbrugernavn Praktikant
08. oktober 2003 - 11:13 Der er 7 kommentarer og
1 løsning

vil ikke slette fra databasen

Kan ikke få følgende til at fungere, hvorfor ????

----------slet_ret.asp--------

<%@LANGUAGE="VBSCRIPT"%>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("db_mig.mdb")
Conn.Open DSN


strSQL="SELECT DISTINCT start, slut, navn, tlf, bookingid FROM datoforesp"
set rs = conn.execute(strSQL)

%>
<table width="500" border="0" cellspacing="0" cellpadding="0">

  <%
do
%>
 
    <tr>
      <td height="20" class="txt2" width="127">Fra:</td>
      <td height="10" class="txt3" width="201"><%=rs("start")%></td>
      <td height="10" class="linkcelle" width="90" align="center">
<a href="" onClick="PopWin6('slette_booking.asp?bookingid=<%= rs("bookingid")%>');return false;">
        <font face="Verdana, Arial" size="2" color="#000000"><b><font color="#CC0000">slette</font></b></font></A></td>
      <td height="10" class="txt2" width="82">&nbsp;</td>
    </tr> 
  <%
rs.movenext
loop while not rs.eof
conn.close
set conn = nothing
%>
</table>


--------------slette_booking.asp-------------

<%@LANGUAGE="VBSCRIPT"%>
<%
Set conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("db_mig.mdb")

ID = (Request.QueryString("bookingid"))
strSQL = "Delete from datoforesp where bookingid = "  & ID
conn.execute(strSQL)


%>

<body leftmargin="0" topmargin="0">
       
        <table width="95%" height="130" border="0" cellspacing="0">
          <tr>
            <td class="txt2" width="101" height="20">
Følgende<% Response.write Request.Querystring ("bookingid") %>, er nu slettet!
</td>
         
          </tr>
         
        </table>


får følgende fejlmeddelse

Fejltype:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC Microsoft Access-driver] Der er en syntaksfejl, fordi der mangler en operator. i forespørgselsudtrykket "bookingid =".
test/slette_booking.asp, line 30

som er  conn.execute(strSQL)

HJÆLPPPP
Avatar billede mm12010 Nybegynder
08. oktober 2003 - 11:24 #1
ID = Request.QueryString("bookingid")
if ID <> "" then
  strSQL = "Delete from datoforesp where bookingid = "  & ID
  conn.execute(strSQL)
else
  response.write "intet ID"
end if
Avatar billede keysersoze Ekspert
08. oktober 2003 - 11:26 #2
det kunne lyde som om at din Request.QueryString("bookingid") er tom - så tjeck lige op på om du virkelig overfører den variabel
Avatar billede mitbrugernavn Praktikant
08. oktober 2003 - 11:34 #3
har lige teste mm12010 svar og det virker stadig ikke :-( kommer med samme fejl.

Siden slet_ret.asp vises fint.

lidt mystisk ?????
Avatar billede mm12010 Nybegynder
08. oktober 2003 - 11:44 #4
prøv at rette dette i slette_booking.asp:

ID = (Request.QueryString("bookingid"))
strSQL = "Delete from datoforesp where bookingid = "  & ID
conn.execute(strSQL)

til:

ID = Int(Request.QueryString("bookingid"))
if ID = Null then
  response.write "intet ID"
else
  strSQL = "Delete from datoforesp where bookingid = "  & ID
  conn.execute(strSQL)
end if
Avatar billede mitbrugernavn Praktikant
08. oktober 2003 - 11:56 #5
vil ikke - nu kommer der bare denne fejl

Fejltype:
Der opstod en Microsoft VBScript-kørselsfejl (0x800A000D)
Typerne stemmer ikke overens: '[string: "0110200301102003bus1"]'
/webhuset/webhuset/gus01102003/kalender/slette_booking.asp, line 32

er linien  ID = Int(Request.QueryString("bookingid"))

feltet i databasen er sat til tekst - er det der der kan være en fejl ?

har teste om der er noget i variablen

ID = Request.QueryString("bookingid")
if ID <> "" then
  response.write (ID)
else
  response.write "intet ID"
end if

og den udskriver glad ud.

?????? men at få den til at slette vil den stadig ikke
Avatar billede mm12010 Nybegynder
08. oktober 2003 - 12:00 #6
hvis dit db-felt er et text-felt skal din SQL være:

strSQL = "Delete from datoforesp where bookingid = '"& ID &"'"
Avatar billede mitbrugernavn Praktikant
08. oktober 2003 - 12:07 #7
supergodt, endelig virker det. Tak for hjælpen
Avatar billede mm12010 Nybegynder
08. oktober 2003 - 12:09 #8
selv tak :o)
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