sql udtræk

det hjælper nok hvis du skriver i camelcase ...

rs.MoveNext

/nute

Hvis jeg prøver:

sql = "select * from tbl_david"
set rs = conn.execute(sql)
while not rs.eof
msgbox rs("felt1")
rs.movenext
wend



Siger den fejl ved prompt til string.... eller omvendt...

Når jeg prøver at debug.writeline så er resultatet "System.__ComObject" selv om der står hej i databasen

Hvorfor?

=
msgbox = rs("felt1")

Ja ,hvis jeg gør det  så er resultatet "System.__ComObject"


???

Ja, det var vist noget sludder jeg kom med, sorry

rs.Fields("felt1")

Det fungere ikke...

Er der ikke en der kan lave et fuldt resultat?

Det er svært at hjælpe når man ikke kender fejlbeskedden?

Nå, anyway, jeg har oplevet at .movenext ikke altid fungerer, afhængigt af hvilken connection jeg bruger. Prøv f.eks.

'** Betingelser:
'** Reference: Microsoft ActiveX Data Objects 2.5 Library

    Dim Conn As New Connection
    Dim rs As Recordset
    Dim strSQL As String
   
  Function Connection()
      Conn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & App.Path & "\DB.mdb"
  End Function

'** Udskrivning **
    Connection
    strSQL = "SELECT * FROM tbl_david"
    Set rs = Conn.Execute (strSQL)

  While Not rs.EOF
    msgbox rs("felt1")
    rs.MoveNext()
  Wend

  Conn.Close


PS: Luk lige dine spørgsmål om datagrid www.eksperten.dk/spm/441487 :o)

nute: Fejlen kan aldrig være, at han ikke skriver i CamelCase!

martin_moth >> oki ... er bare vandt til at Java er case sensitive, og siden VB ikke er noget jeg arbejder så forfærdelig meget med, så er det hurtig at forveksle :-)

Prøv med Value:

rs.Fields("felt1").Value