Visual Basic og Access

prøv at ænder by navn til en i stedet for to

Den komme desvære med samme fejl!

Hmm.. men har du ikke et stykke kode hvor du bare åbner en access database og udskriver fra én tabel?

Du skriver ikke hvad fejl den kommer med, men jeg har lavet et lille eksempel, delvist baseret på din kode.

Option Explicit

Dim strConn As Connection
Dim rsInfo As Recordset

\' Show the data.
Private Sub ShowData()
  With rsInfo
    lblnavn.Caption = !FirstName
    lblLNavn.Caption = !LastName
  End With
End Sub
Private Sub Command1_Click()
  ShowData
End Sub

Private Sub Command2_Click()
  With rsInfo
    .MoveNext
    If .EOF Then .MoveLast
  End With
End Sub

\' Open the database.
Private Sub Form_Load()
  \' Open the database.
  Set strConn = New Connection
  Set rsInfo = New Recordset
   
  strConn.ConnectionString = \"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\" & App.Path & \"\\db.mdb;Persist Security Info=False\"
  strConn.Open
       
  With rsInfo
    .Source = \"SELECT * FROM Brugere;\"
    .Open , strConn
     
    If Not .EOF And Not .BOF Then
      .MoveFirst
    End If
  End With
   
  \' Display the initial data.
  Command1_Click
End Sub

\' Close the database.
Private Sub Form_Unload(Cancel As Integer)
  strConn.Close
End Sub

Husk at sætte reference til Microsoft ActiveX Data Objects 2.x Library. Min er sat til 2.6.

Det kan være at du skal ændre
Provider=Microsoft.Jet.OLEDB.4.0 til
Provider=Microsoft.Jet.OLEDB.3.51.

Torben

-

Kunne du ikke bruge mit eksempel?

Torben

nej... ville ikke virke.. -men tror gerne det virker..  men jeg er nybegynder i Visual Basic, og jeg trode det var lige så enkelt som det var i ASP, -men det var det ikke :-(

Men du skal ha\' MANGE tak for din hjælp.. -selvom jeg ikke kunne bruge det ;-)  -Men sådan er det jo at ha\' med nybegyndre at gøre! *s*

Det er da OK - havde bare forventet mere end en streg :)

*G* ok...

Du får 2 næste gang ;-)

Ej... det var måske oxo lidt koldt! :-)

sorry...