Annat Skumt Fel

21 svar · 281 visningar · startad av ConnyFox 17 dec. 2001

ConnyFoxMedlem sedan aug. 20011 087 inlägg

Frågan17 dec. 2001 21:15#1

Jag har en länk
<a href="memb_info.asp?member=<%=RecSet("nick")%>"><%=RecSet("Nick")%></a>

O ska sedan läsa på memb_info.asp med denna sql satsen
SQL = "SELECT * FROM members WHERE nick = '" & Request.Querystring("member") & "'"

Sedan listar jag upp innehållet med detta o får genast fel på första recset'en

<%=RecSet("nick")%>
<%=RecSet("alder")%> år
<%=RecSet("namn")%>
<%=RecSet("efternamn")%>
<%=RecSet("email")%>
<%=RecSet("hemsida")%>

------------------
*brölar ljudligt*

ConnyFoxMedlem sedan aug. 20011 087 inlägg

17 dec. 2001 21:18#2

O japp jag e heeelt säker på att det finns en kolumn som heter nick i members.. o att databasen heter members.mdb :e

------------------
*brölar ljudligt*

LarsGMedlem sedan dec. 200012 464 inlägg

17 dec. 2001 21:22#3

Vad får du för fel då?

Du kan väl visa resten av koden också.

------------------
essentitia preter non sans multiplicandum

icaaqMedlem sedan okt. 20005 273 inlägg

17 dec. 2001 21:23#4

om du skriver.

Response.Write SQL

Efter din SQL sats vad får du då ??

------------------
kolung.....det tål att tänkas på!

ConnyFoxMedlem sedan aug. 20011 087 inlägg

17 dec. 2001 21:29#5

Jag får : SELECT * FROM members WHERE nick = 'Lille Stille'

*funderar över kolung*

resten av koden.. *suck* hehe jaja men d borde vara memb_info.asp som e fel eftersom sql satsen går fram som den ska ?! :e

memb_info.asp

<% 

database = Server.MapPath("members.mdb")
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& database
Set RecSet = Server.CreateObject("ADODB.Recordset")

SQL = "SELECT * FROM members WHERE nick = '" & Request.Querystring("member") & "'"
Response.Write SQL
%>

<html>
<head>
	<title>Untitled</title>
	<link rel="stylesheet" href="mall.css">
</head>

<body>

<table>
<tr><td>
<%=RecSet("nick")%>
</td><td>
<%=RecSet("alder")%> år
</td><td>
<%=RecSet("namn")%>
</td><td>
<%=RecSet("efternamn")%>
</td><td>
<%=RecSet("email")%>
</td><td>
<%=RecSet("hemsida")%>
</td><tr>
</table>
</body>
</html>

Och memb_list.asp där länken till memb_info.asp ligger

<% 

database = Server.MapPath("members.mdb")
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& database
Set RecSet = Server.CreateObject("ADODB.Recordset")

if Request.querystring("search") = "search" then
SQL = "SELECT * FROM members WHERE namn LIKE '%" & request.form("namn") & "%' AND nick LIKE '%" & request.form("nick") & "%' AND efternamn LIKE '%" & request.form("efternamn") & "%'"

elseif Request.querystring("order") = "nick" then
SQL = "SELECT * FROM members ORDER BY nick"

elseif Request.querystring("order") = "Namn" then
SQL = "SELECT * FROM members ORDER BY namn"

elseif Request.querystring("order") = "efternamn" then
SQL = "SELECT * FROM members ORDER BY efternamn"

elseif Request.querystring("order") = "alder" then
SQL = "SELECT * FROM members ORDER BY alder"

elseif Request.querystring("order") = "email" then
SQL = "SELECT * FROM members ORDER BY email"

elseif Request.querystring("order") = "hemsida" then
SQL = "SELECT * FROM members ORDER BY hemsida"

else
SQL = "SELECT * FROM members ORDER BY datum"

end if

RecSet.Open SQL, Connection, 3, 3
%>

<html>
<head>
	<title>Untitled</title>
	<link rel="stylesheet" href="mall.css">
</head>

<body>
<table>
<tr><td><a href="memb_list.asp?order=nick">Stajlnamn</a>
</td><td><a href="memb_list.asp?order=alder">Ålder</a>
</td><td><a href="memb_list.asp?order=namn">Namn</a>
</td><td><a href="memb_list.asp?order=efternamn">Efternamn</a>
</td><td><a href="memb_list.asp?order=email">eMail</a>
</td><td><a href="memb_list.asp?order=hemsida">Hemsida</a></td><tr>

<% do until RecSet.EOF %>

<tr><td>
<a href="memb_info.asp?member=<%=RecSet("nick")%>"><font class="<%=RecSet("admin")%>"><%=RecSet("Nick")%></font></a>
</td><td>
<%=RecSet("alder")%> år
</td><td>
<%=RecSet("namn")%>
</td><td>
<%=RecSet("efternamn")%>
</td><td>
<%=RecSet("email")%>
</td><td>
<%=RecSet("hemsida")%>
</td><tr>

<%
RecSet.MoveNext
loop

RecSet.Close
connection.Close
%>

</body>
</html>

------------------
*brölar ljudligt*

LarsGMedlem sedan dec. 200012 464 inlägg

17 dec. 2001 21:32#6

Vad får du för felmeddelande?

------------------
essentitia preter non sans multiplicandum

icaaqMedlem sedan okt. 20005 273 inlägg

17 dec. 2001 21:35#7

database = Server.MapPath("members.mdb")

Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& database

SQL = "SELECT * FROM members WHERE nick = '" & Request.Querystring("member") & "'"

Set RecSet = Connection.Execute(SQL)
'Resten av din kod.....

det ska väl räcka...eller?

Jag menar du öppnar ju inte ditt recordset i din kod....

------------------
kolung.....det tål att tänkas på!

[Redigerat av icaaq den 17 dec 2001]

ConnyFoxMedlem sedan aug. 20011 087 inlägg

17 dec. 2001 21:37#8

SELECT * FROM members WHERE nick LIKE 'Lille Stille' ADODB.Recordset fel '800a0cc1'

Objektet kunde inte hittas i mängden med det begärda namnet eller numret.

/StajlLinks 1.0/memb_info.asp, rad 23

Men ska det verkligen stå 'Lille Stille' ? ska inte ' ' bort??

------------------
*brölar ljudligt*

icaaqMedlem sedan okt. 20005 273 inlägg

17 dec. 2001 21:39#9

Nej ' ' ska inte bort...dem ska vara där när det är text som behandlas.....

------------------
kolung.....det tål att tänkas på!

ConnyFoxMedlem sedan aug. 20011 087 inlägg

17 dec. 2001 21:41#10

Icaaq, vad e skillnaden mellan din kod o min? förutom att jag får error på denna raden med din? :e

Set RecSet = Connection.Execute(SQL)

------------------
*brölar ljudligt*

icaaqMedlem sedan okt. 20005 273 inlägg

17 dec. 2001 21:42#11

vad exakt får du för felmess?

------------------
kolung.....det tål att tänkas på!

ConnyFoxMedlem sedan aug. 20011 087 inlägg

17 dec. 2001 21:45#12

Kolla tre mess upp det står där ;)

SELECT * FROM members WHERE nick = 'Lille Stille'

ADODB.Recordset fel '800a0cc1'

Objektet kunde inte hittas i mängden med det begärda namnet eller numret.

/StajlLinks 1.0/memb_info.asp, rad 23

------------------
*brölar ljudligt*

icaaqMedlem sedan okt. 20005 273 inlägg

17 dec. 2001 21:48#13

vad är Nick för fälttyp ?

------------------
kolung.....det tål att tänkas på!

ConnyFoxMedlem sedan aug. 20011 087 inlägg

17 dec. 2001 21:50#14

D e ett textfält

------------------
*brölar ljudligt*

icaaqMedlem sedan okt. 20005 273 inlägg

17 dec. 2001 22:03#15

Du kan ju testa att köra SQL-satsen i access ...och se om den fungerar där

------------------
kolung.....det tål att tänkas på!

ConnyFoxMedlem sedan aug. 20011 087 inlägg

17 dec. 2001 22:06#16

och detta gör man hur? =/

------------------
*brölar ljudligt*

icaaqMedlem sedan okt. 20005 273 inlägg

17 dec. 2001 22:09#17

du skapar en fråga i designläge...lägger dit dem tabeller som det gäller....högerklickar och trycker på SQL ....

Sen klistrar du in din fråga....

Sen är det bara att köra frågan :e

------------------
kolung.....det tål att tänkas på!

ConnyFoxMedlem sedan aug. 20011 087 inlägg

18 dec. 2001 17:17#18

Asså fattade noll av det.. men i ett sista desperat försök att få i ordning detta postar jag koderna igen!

Memb_list.asp - Länken längre ner som skickar vidare till memb_info.asp

<% 

database = Server.MapPath("members.mdb")
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& database
Set RecSet = Server.CreateObject("ADODB.Recordset")

if Request.querystring("search") = "search" then
SQL = "SELECT * FROM members WHERE namn LIKE '%" & request.form("namn") & "%' AND nick LIKE '%" & request.form("nick") & "%' AND efternamn LIKE '%" & request.form("efternamn") & "%' AND alder LIKE '%" & request.form("alder") & "%' AND email LIKE '%" & request.form("email") & "%'"

elseif Request.querystring("order") = "nick" then
SQL = "SELECT * FROM members ORDER BY nick"

elseif Request.querystring("order") = "Namn" then
SQL = "SELECT * FROM members ORDER BY namn"

elseif Request.querystring("order") = "efternamn" then
SQL = "SELECT * FROM members ORDER BY efternamn"

elseif Request.querystring("order") = "alder" then
SQL = "SELECT * FROM members ORDER BY alder"

elseif Request.querystring("order") = "email" then
SQL = "SELECT * FROM members ORDER BY email"

elseif Request.querystring("order") = "hemsida" then
SQL = "SELECT * FROM members ORDER BY hemsida"

else
SQL = "SELECT * FROM members ORDER BY datum"

end if

RecSet.Open SQL, Connection, 3, 3
%>

<html>
<head>
	<title>Untitled</title>
	<link rel="stylesheet" href="mall.css">
</head>

<body>
<table>
<tr><td><a href="memb_list.asp?order=nick">Stajlnamn</a>
</td><td><a href="memb_list.asp?order=alder">Ålder</a>
</td><td><a href="memb_list.asp?order=namn">Namn</a>
</td><td><a href="memb_list.asp?order=efternamn">Efternamn</a>
</td><td><a href="memb_list.asp?order=email">eMail</a>
</td><td><a href="memb_list.asp?order=hemsida">Hemsida</a></td><tr>

<% do until RecSet.EOF %>

<tr><td>
[b]<a href="memb_info.asp?member=<%=RecSet("nick")%>"><font class="<%=RecSet("admin")%>"><%=RecSet("Nick")%></font></a>[/b]
</td><td>
<%=RecSet("alder")%> år
</td><td>
<%=RecSet("namn")%>
</td><td>
<%=RecSet("efternamn")%>
</td><td>
<%=RecSet("email")%>
</td><td>
<%=RecSet("hemsida")%>
</td><tr>

<%
RecSet.MoveNext
loop

RecSet.Close
connection.Close
%>

</body>
</html>

memb_info.asp - ska lista infot på medlemmen man klickat på

<% 

database = Server.MapPath("members.mdb")
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& database
Set RecSet = Server.CreateObject("ADODB.Recordset")
[b]
SQL = "SELECT * FROM members WHERE nick = '" & Request.Querystring("member") & "'"
[/b]
Response.Write SQL
%>

<html>
<head>
	<title>Untitled</title>
	<link rel="stylesheet" href="mall.css">
</head>

<body>

<table>
<tr><td>
<%=RecSet("nick")%>
</td><td>
<%=RecSet("alder")%> år
</td><td>
<%=RecSet("namn")%>
</td><td>
<%=RecSet("efternamn")%>
</td><td>
<%=RecSet("email")%>
</td><td>
<%=RecSet("hemsida")%>
</td><tr>
</table>
</body>
</html>

Och jag får följande error mess :

SELECT * FROM members WHERE namn = 'Johnny' ADODB.Recordset fel '800a0cc1' 

Objektet kunde inte hittas i mängden med det begärda namnet eller numret. 

/StajlLinks 1.0/memb_info.asp, rad 23

Alltså där första RecSet är..

------------------
*brölar ljudligt*

LarsGMedlem sedan dec. 200012 464 inlägg

18 dec. 2001 18:23#19

Du öppnar aldrig ditt recordset:

SQL = "SELECT * FROM members WHERE nick = '" & Request.Querystring("member") & "'"

Response.Write SQL
set recset = connect.execute(sql)

------------------
essentitia preter non sans multiplicandum

ConnyFoxMedlem sedan aug. 20011 087 inlägg

18 dec. 2001 18:34#20

haha tack, fyfan vilken tabbe! O jag satt o kollade på sql satsen o databasen hela tiden :o) Tack lars du e en klippa! *skämms* D värsta e faktiskt att ingen av alla jag frågat sett det heller så ;)

------------------
*brölar ljudligt*