Avatar billede Slettet bruger
25. januar 2007 - 13:25 Der er 5 kommentarer og
1 løsning

Database hjælp til at hente

Hej. Jeg har denne her kode.

Det er meneningen at Der skal stå:
Brugernavnet
Beskeden
<hr>

Men den kan ikke skrive Beskeden ud. Den siger:
ADODB.Recordset error '800a0cc1'

Item cannot be found in the collection corresponding to the requested name or ordinal.

/tagwall/Default.asp, line 44


Min kode ser sådan her ud:

<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Driver={MySQL ODBC 3.51 Driver};Server=db.gimo.dk;Database=web164633;Option=3;User==********;";Password=********;"

strSQL = "SELECT * FROM Tagwall"
Set rs = Conn.Execute(strSQL)

if not rs.EOF then
dim ids
ids = rs("Brugernavn")
%>
<%
Set conn2 = Server.CreateObject("ADODB.Connection")
conn2.Open "Driver={MySQL ODBC 3.51 Driver};Server=db.gimo.dk;Database=web164633;Option=3;User==********;";Password=********;"

strSQL = "SELECT * FROM Bruger where id=" & ids
Set rs = Conn2.Execute(strSQL)

if not rs.EOF then
%>
<%=rs("Brugernavn")%>:
<% End If%>
<%
Conn2.Close
Set Conn2 = Nothing
%>
<br><%=rs("Besked")%>
<hr size="1" />
  <%end if%>
Avatar billede kalp Novice
25. januar 2007 - 13:59 #1
dine Conn1 og Conn2

skal begge være med småt.. conn1 conn2
Avatar billede kalp Novice
25. januar 2007 - 14:00 #2
hov sorry.. den hedder bare Conn og den anden Conn2 hehe
men i begge hvor du executer dem skal du lige rette til småt.
Avatar billede kalp Novice
25. januar 2007 - 14:00 #3
og dine cloe på Conn2 skal også rettes til småt.
Avatar billede ellebaek Nybegynder
25. januar 2007 - 14:01 #4
du bliver nødt til at lave det til 2 forskellige navne når du laver din select-sql...
I det hele taget er din kode ikke helt optimal...

Men prøv det her:

<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Driver={MySQL ODBC 3.51 Driver};Server=db.gimo.dk;Database=web164633;Option=3;User==********;";Password=********;"

strSQL = "SELECT * FROM Tagwall"
Set rs = Conn.Execute(strSQL)

if not rs.EOF then

strSQL = "SELECT * FROM Bruger where id=" & rs("Brugernavn")
Set rsBruger = Conn.Execute(strSQL)

if not rsBruger.EOF then
response.write rsBruger("Brugernavn") & ":"
End If
response.write "<br>" & rs("Besked")
response.write "<hr size=""1"" />"
end if
%>

Det skulle gerne gøre det for dig... Inden ville du hente feltet besked fra tabellen bruger (da du overskriver rs)
Avatar billede lordnelson Seniormester
25. januar 2007 - 14:05 #5
HAr nu aldrig været udsat for det er et problem med vbscript?

Detr den skriver er at du har en RS("et eller andet")
i linie 44 den Rs("et eller andet") er ikke et felt i den
tabel du åbner.
Svært når du ikke skriver hvad linie 44 indeholder
men se på dine tabeller Tagwall Og bruger og se om
du ikke har stavet forkert.
LN
Avatar billede Slettet bruger
25. januar 2007 - 14:15 #6
Ellebaek jeg fik det til at virke.. Jaaaa. Men tak til kalp afligevel.
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