webForumDet fria alternativet

Va f*n

ASP

7 svar · 276 visningar · startad av crisse6

Medlem sedan dec. 20002 526 inlägg
Frågan#1

vad är det för fel på denna kod? jag får verkligen inte fram något!

<%
Set Databas = Server.CreateObject("ADODB.Connection")
MdbFilePath = Server.MapPath("kompis.mdb")
Databas.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ= " & MdbFilePath & ";"

SQL = "SELECT username FROM kompisar WHERE username = '" & Session ("Username") & "')"

Databas.Execute(SQL)
%>
Medlem sedan feb. 20005 891 inlägg
#2

Ehh, du måste använda nån form av loop för att "få fram något" ;)

------------------
jo, jag är nog dummare än jag ser ut

Medlem sedan dec. 20002 526 inlägg
#3

ehh... hur menar du då?

Medlem sedan feb. 20005 891 inlägg
#4

Låt oss ta detta från början; vad vill du göra mha koden? ;)

(Just nu väljer den tabellen "kompisar" där användarnamnet är detsamma som Session("Username"), inget annat)

------------------
jo, jag är nog dummare än jag ser ut

Medlem sedan dec. 20002 526 inlägg
#5

ändrade lite så den hämtar...
men försökte få den att kolla vilken användare det är som är inne med Session("username") gick inte bra :( jag vill helt enkelt, att användaren skall kunna få se vilka han/hon är kompis med! här är mitt skript så länge...
[kod]<%
Set Databas = Server.CreateObject("ADODB.Connection")
MdbFilePath = Server.MapPath("kompis.mdb")
Databas.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ= " & MdbFilePath & ";"

SQL = "SELECT username FROM kompisar WHERE username = 'crisse'"
SQL = "SELECT namn2 FROM kompisar WHERE namn2 = 'Linkan'"
Set rsFoo = Databas.Execute(SQL)
Do Until rsFoo.EOF
Response.Write rsFoo("username") & rsFoo("namn2") & "<br>"

rsFoo.MoveNext
Loop
%> [kod]

Medlem sedan dec. 20003 563 inlägg
#6

Testa något liknande

<%
Set Databas = Server.CreateObject("ADODB.Connection")
MdbFilePath = Server.MapPath("kompis.mdb")
Databas.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ= " & MdbFilePath & ";"
Set RS = Databas.execute("SELECT username, kompis FROM kompisar WHERE username = '" & Session ("Username") & "' ")

do until RS.EOF
response.write(RS("username") & " är kompis med " & RS("kompis") & "<br>")
RS.MoveNext
loop
%>

------------------
MVH // Cyprys
Cyprys bakgård

Om du någonsin ser mig bli misshandlad av polisen, var snäll och lägg ner videokameran och kom och hjälp mig i stället.

Medlem sedan dec. 20002 526 inlägg
#7

Yeah baby, yeah baby!

I love cyprys, I love u! :e :e

Ska dra till åre ikväll, ska du med? Jag bjuder för att nu är du min kompis :e

jag fick det nästan att funka själv... men den visade bara en kompis... men efter cyprys hjälp visar den alla kompisar!

Medlem sedan dec. 20002 526 inlägg
#8

en sista fråga... om man vill göra det möjligt att läsa typ fakta om sin kompis, hur får man det att funka?
borde väl gå med en inbakad länk i det script jag fick och lite querystring kanske?

255 ms totalt · 4 externa anrop · v20260731065814-full.6fe65c25
125 ms — deklarationer (db)
0 ms — hämta statistik (cache)
127 ms — hämta tråd, inlägg och bilagor (db)
120 ms — ändringar (db)