Avatar billede george Nybegynder
24. marts 2007 - 19:43 Der er 6 kommentarer og
1 løsning

Hvorfor vises "Field names" fra alle tabeller ?

Jeg har siddet og kigget lidt på dette spørgsmål, http://www.eksperten.dk/spm/634779, og har fået skruet denne kode sammen :

set conn=Server.CreateObject("ADODB.Connection")
strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("../log/vl10.asp")
Conn.Open strDSN

Set rs = Server.CreateObject("ADODB.RecordSet")
strSQL = "SELECT * FROM Moededeltagelse"
Conn.Execute(strSQL)

Set rs=Conn.OpenSchema(4)
do until rs.EOF
    response.write rs("COLUMN_NAME") & "<br>"
rs.MoveNext
loop

rs.Close
conn.close
set rs=nothing
set conn=nothin

Men hvorfor vises "Field names" fra alle tabellerne og ikke kun i den ene tabel, i mit tilfælde "Moededeltagelse" ?

Hvordan kan jeg undgå det ?
Avatar billede erikjacobsen Ekspert
24. marts 2007 - 20:08 #1
Du kan vist tilføje en
      rs.Filter="TABLE_NAME='Moededeltagelse'"
Avatar billede george Nybegynder
24. marts 2007 - 20:23 #2
Jeg formoder den skal tilføjes i strSQL'en et eller andet sted, men hvor ?
Avatar billede erikjacobsen Ekspert
24. marts 2007 - 20:34 #3
Din sql-sætning laver absolut ingenting i dit script. Du skal tilføje mit forslag efter Set rs=Conn.OpenSchema(4)
Avatar billede george Nybegynder
24. marts 2007 - 21:04 #4
Ja det ser ud til at virke. Løsningen skal være sådan her :

set conn=Server.CreateObject("ADODB.Connection")
strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("../log/vl10.asp")
Conn.Open strDSN

Set rs = Server.CreateObject("ADODB.RecordSet")
strSQL = "SELECT * FROM Moededeltagelse"
Conn.Execute(strSQL)

Set rs=Conn.OpenSchema(4)
rs.Filter="TABLE_NAME='Moededeltagelse'"
do until rs.EOF
    response.write rs("COLUMN_NAME") & "<br>"
rs.MoveNext
loop

rs.Close
conn.close
set rs=nothing
set conn=nothing

Tak for hjælpen. Svar = points.
Avatar billede erikjacobsen Ekspert
24. marts 2007 - 21:30 #5
Jeg samler slet ikke på point. Men du kan roligt slette disse 3 linier, da de gør hverken fra eller til - udover at belaste serveren:

Set rs = Server.CreateObject("ADODB.RecordSet")
strSQL = "SELECT * FROM Moededeltagelse"
Conn.Execute(strSQL)
Avatar billede george Nybegynder
24. marts 2007 - 21:34 #6
Ok, det gør jeg. Tak for tippet.
Avatar billede george Nybegynder
24. marts 2007 - 21:34 #7
svar
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