Just nu i M3-nätverket
Gå till innehåll

Problem!


Jimizola1

Rekommendera Poster

får ett felmeddelande hela tiden och får inte rätt på det.

 

Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)

[MIMER][ODBC MIMER Driver][MIMER/DB]Syntax error, END_OF_QUERY assumed missing

/halsomagasinet/del_medl.asp, line 19

 

sida1:

 

<% Option Explicit %>

<html>

<head>

<link rel="stylesheet" href="stylesheet.css">

<title>

HÄLSOMAGASINET

</title>

<body>

<!--#include file="anslut.asp"-->

<!--#include virtual="/adovbs.inc"-->

<%

Dim RS, SQL

 

SQL = "SELECT * FROM MEDLEMMAR"

 

Set RS = objConn.Execute(SQL)

 

%>

 

<form method="get" action="del_medl.asp">

 

<select name="delete">

 

<%

 

Do while not RS.EOF

Response.Write "<option>" & RS("NAMN") & "</option>"

RS.MoveNext

Loop

%>

 

</select>

<input type="submit" value="Ta bort medlem!">

</form>

 

 

<%

RS.Close

objConn.Close

Set RS = Nothing

Set objConn = Nothing

%>

 

</body>

</html>

 

 

sida2:

<% Option Explicit %>

<html>

<head>

<link rel="stylesheet" href="stylesheet.css">

<title>HÄLSOMAGASINET

</title>

</head>

<body>

<!--#include file="anslut.asp"-->

<!--#include virtual="/adovbs.inc"-->

 

<%

Dim SQL, MEDLEM

 

MEDLEM = Request.QueryString("delete")

Response.Write("<div><center>" & "Du tog precis bort "& MEDLEM &"")

 

SQL = "DELETE FROM MEDLEMMAR WHERE NAMN='"& MEDLEM &"' "

objConn.Execute(SQL)

 

 

objConn.Close

Set objConn = Nothing

 

%>

</body>

</html>

Länk till kommentar
Dela på andra webbplatser

Hmm, det ser ut som om inga poster hittats efter databasen har itererats.

 

Response.Write("<div><center>" & "Du tog precis bort "& MEDLEM &""

 

Får du upp rätt namn på personen här? Alltså innehåller strängen 'MEDLEM' något värde?

 

Mvh

/Cat

 

[inlägget ändrat 2001-12-13 16:24:16 av Cat]

Länk till kommentar
Dela på andra webbplatser

SQL = "DELETE FROM MEDLEMMAR WHERE NAMN='"& MEDLEM &"' "

 

Har du provat att ta bort 'enkel-fnuttarma' runt MEDLEM, samt skippa mellanslagen mellan MEDLEM och &-tecknena?

 

Mvh

/Cat

 

Länk till kommentar
Dela på andra webbplatser

Prova följande:

 

SQL = "DELETE FROM MEDLEMMAR WHERE NAMN='"&Request.QueryString("delete")&"'"

 

Hoppas det funkar, om inte får vi ta en närmare titt på det. ;)

 

Mvh

/Cat

 

 

 

Länk till kommentar
Dela på andra webbplatser

Nix ingen lycka där tyvärr fick följande felmeddelande istället:

 

Feltyp:

Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)

[MIMER][ODBC MIMER Driver][MIMER/DB]Syntax error, END_OF_QUERY assumed missing

/halsomagasinet/del_medl.asp, line 19

 

 

 

 

Länk till kommentar
Dela på andra webbplatser

Hmm...mysko.

Har du provat att använda Method=post istället för get i form-taggen?

 

Glöm bara inte att använda Request.Form("delete") istället för Request.QueryString("delete") på sid 2.

 

Detta borde inte göra någon skillnad, men det är kanske värt ett försök.

 

Du kanske kunde publicera filen "anslut.asp", förresten?

 

Mvh

/Cat

 

 

Länk till kommentar
Dela på andra webbplatser

anslut.asp:

 

<%

Dim objConn

Set objConn = Server.CreateObject("ADODB.Connection")

objConn.Open "halsomagasinet", "Admin", "pw"

%>

 

jag har testat request.form, det konstiga är att jag har en annan fil som ser exakt likadan ut och den fungerar förutom att jag bytt ut MEDLEM till ID och att ID är heltal i databasen

 

 

Länk till kommentar
Dela på andra webbplatser

"anslut.asp" ser juh ok ut...hmm...

 

Fungerar det om du anger ett namn istället för en variabel?

Ex:

 

SQL = "DELETE FROM MEDLEMMAR WHERE NAMN="Nisse""

 

Mvh

/Cat

 

 

Länk till kommentar
Dela på andra webbplatser

får detta felmeddelandet nu

 

Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)

[MIMER][ODBC MIMER Driver][MIMER/DB]UPDATE or DELETE operation invalid because the referenced table ADMIN.MEDLEMMAR does not satisfy a referential constraint

/halsomagasinet/del_medl.asp, line 19

 

 

 

 

Länk till kommentar
Dela på andra webbplatser

Skulle tro att problemet ligger i mellanslaget. Prova att göra om:

Response.Write "<option>" & RS("NAMN") & "</option>"

 

till

 

%>
<option>"<%=rs("NAMN")%>"</option>
<%

 

Alltså baka in VBScriptet i HTML-koden istället för tvärt om.

 

Mvh

/Cat

 

 

 

 

Länk till kommentar
Dela på andra webbplatser

det blev ju rätt svarsmeddelande

Du tog precis bort "MONA_KJELLSSON"

 

men den tar ju inte bort den från databasen, och har man inte med "" så fblir det samm fel som innan

 

 

 

 

Länk till kommentar
Dela på andra webbplatser

Vad händer om du lägger till en medlem utan mellanslag och försöker radera den samme? Fungerar det?

 

Mvh

/Cat

 

 

 

 

[inlägget ändrat 2001-12-13 18:25:23 av Cat]

Länk till kommentar
Dela på andra webbplatser

Glömt paranteser!

 

Fel:

Response.Write "<option>" & RS("NAMN") & "</option>"

 

Rätt:

Response.Write ("<option>" & RS("NAMN") & "</option>")

 

 

Länk till kommentar
Dela på andra webbplatser

BAAAAHH!!!

Hur kunde jag missa det? ;)

 

Nåja, alltid lär man sig något nytt, som att läsa till exempel... =)

 

Lycka till med resten, och maila gärna url'en när du är klar!

 

Mvh

/Cat

 

 

 

Länk till kommentar
Dela på andra webbplatser

jag har fått rätt på det

korkat nog så var posten namn med även i en annan tabell och då går den ju inte att ta bort. glömde kolla det men nu funkar det :-)

 

Länk till kommentar
Dela på andra webbplatser

Arkiverat

Det här ämnet är nu arkiverat och är stängt för ytterligare svar.

×
×
  • Skapa nytt...