Du har kanske inte lagt till någon kompis så då blir det ju 0 kompisar ;)
------------------
Fem miljoner fluggor kan inte ha fel, ät bajs.
15 svar · 131 visningar · startad av hacktheplanet
hej varför funkar inte denna kod???
står att man har 0 som kompisar:
<%
Set conn1 = Server.CreateObject("ADODB.Connection")
conn1.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("Database/kompisar.mdb")&";"
strsql1 = "select count(*) as kompisar from kompis where namn = '" & session("id") & "'"
set rs=conn1.execute(strsql1)
response.write ""&rs("kompisar")%>
[Redigerat av hacktheplanet den 04 dec 2001]
Du har kanske inte lagt till någon kompis så då blir det ju 0 kompisar ;)
------------------
Fem miljoner fluggor kan inte ha fel, ät bajs.
jo jag har lagt till en kompis
så här ser databasen ut:
ID ID1 ID2 namn
32 3 5 bla bla bla
34 3 10 Blablabla
ID=ID
ID1= min ID
ID2=kompisen
Namn= namn på kompisen
Vad innehåller Session("id")?
strsql1 = "select count(*) as kompisar from kompis where namn = '" & session("id") & "'"
Skall inte villkoret sitta på ID eller ID1? Jag vet inte riktigt hur du vill att utsökningen ska göras, men...
Mvh,
------------------
Don't panic!
id = han som e inloggad
Vad? ett namn? Ett id-nummer från databasen? Ska du verkligen jämföra mot namn-fältet i databasen?
Skriv ut din SQL-fråga med response.write också, så du kan se hur den ser ut i färdigt skick.
------------------
Don't panic!
öö fattar inte
hitta koden färdig nånstans
så här ser min kompislista ut:
<%
Set Connect2 = Server.CreateObject("ADODB.Connection")
Connect2.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("Database/members.mdb")&";pwd=losen"
Set RecSet2 = Server.CreateObject("ADODB.Recordset")
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("Database/kompisar.mdb")&";"
Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "Select * From kompis Where ID1 = "&Session("id")
RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic
%>
Det är svårt för mig att veta hur din kod funkalerar när du inte vet det själv, men...
Prova detta:
strsql1 = "select count(*) as kompisar from kompis where ID1 = " & session("id")
Gissar dock bara. Resten enligt koden i ditt första inlägg.
Mvh,
------------------
Don't panic!
har provat men det gick inte
Ok, då försöker vi så här:
<%
Set conn1 = Server.CreateObject("ADODB.Connection")
conn1.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("Database/kompisar.mdb")&";"
strsql1 = "select count(*) as kompisar from kompis where namn = '" & session("id") & "'"
[b]Response.Write strsql1[/b]
set rs=conn1.execute(strsql1)
response.write ""&rs("kompisar")%>
Du borde nu få en utskrift av den färdiga SQL-frågan. Hur ser den ut?
------------------
Don't panic!
japp nu funkar det konstigt
råka spara över en annan fil hehe
heheheh juste spara rätt fil ;-)
[Redigerat av antar den 04 dec 2001]
[Redigerat av antar den 24 jan 2002]