Eksempler på forbindelse til Access fra VB

Mener du VB-script på ASP eller VisualBasic?

Visual Basic!

Kan dette bruges:

Start på:
http://msdn.microsoft.com/library/en-us/off2000/html/acsumAccessObjHierarchy.asp

Her har du hele objekt-modellen, og referencen til alle metoder og lign.

Den metode du er ude efter er:
http://msdn.microsoft.com/library/en-us/off2000/html/acmthactOpenReport.asp

Som kaldes via application objektet:
http://msdn.microsoft.com/library/en-us/off2000/html/acobjApplication.asp

DoCmd:
http://msdn.microsoft.com/library/en-us/off2000/html/acobjDoCmd.asp

Kilde: http://www.netcoders.dk/forum.asp?mode=show_message&tech_id=11&forum_id=41&message_id=49513

strCon = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & "min-db.mdb"
strSql = "SELECT * FROM personer"
Set objRS = CreateObject("ADODB.Recordset")
   
objRS.Open strSql, strCon, 1, 3

---------------------------
Denne kode danner en forbindelse. Herefter kan du bruge:

objRS.Movenext 'Næste record
objRS("Feltnavn") ' returnerer eller sætter værdien i et felt.
objRS.Update ' Gemmer ændringer i databasen
objRS.EOF ' Returnerer om du er ved enden af databasen

Det er ret let, hvis du bruger dataenviroment objektet

Dim db as database
Dim rs as recordset
Dim strSQL as string

Set db = OpenDatabase("C:\database.mdb")
'Sådan skriver man
db.Execute "insert into TblPerson(navn) select 'Svanhovd'"

'Sådan læser man
strSQL = ("select navn from tblPerson where navn ='Svanhovd'")
Set rs = db.OpenRecordset(strSQL)

label1.caption=rs!navn

'Husk at tilføje DAO 3.6 i references inden du går i gang

du kunnu jo også bare bruge "data" componentet ude i din menu til venstre(stamdard)

og deri under databasename, vælger du bare databasen,
derefter hvilken tabel "Recordset" du vil bruge.

Laver knapperne.

også har du simple fnktioner såsom

data1.recordset.Addnew
data1.recordset.Delete
data1.recordset.movenext
data1.recordset.movelast
data1.recordset.update
data1.recordset.movefirst
data1.recordset.previous
Osv.

ret simpelt, og overskueligt.

Lukketid??¿¿??