ask script modul vb6 dengan beberapa koneksi tabel ??

[Guesuper]

dengan vb6



Gan Ada yang tau gak script dimodule untuk conneksi lebih dari satu tabel acces



nah misalnya table di acces 1 untuk login

ane buat yang kedua untuk data pelajar



nah script untuk koneksi lebih dari satu table itu gmn ya gan ???



nih script untuk login



Public Conn As New ADODB.Connection

Public RSPetugas As ADODB.Recordset



Public Sub Buka()

Set Conn = New ADODB.Connection

Set RSPetugas = New ADODB.Recordset

Conn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\DATABASE.mdb"

End Sub



nah ane buat yang pelajar seperti itu juga tapi kok eror ya ???



Public Conn As New ADODB.Connection

Public RSPelajar As ADODB.Recordset



Public Sub Buka()

Set Conn = New ADODB.Connection

Set RSPelajar = New ADODB.Recordset

Conn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\DATABASE.mdb"

End Sub



nah ada yang tau gak script yang benar ???

thanks ya gan buat yang kasih solusi !!