Database

[Red Dog]

hallo

kan mir jemand sagen, wie ich eine database verwenden muss/kann?
ich habe zb eine access database, und jetzt will ih den text in zeile 1 spalte 1 auslesen.
wie geht das?

danke schonmal

[MJP]

gude ^^
also das mit der Datenbank is total easy

Mit der MDB LIB DOWNLOAD von Paul Leischow kannst du auf alles ganz einfach zugreifen...

Hier mal ein Beispiel Code...

Code: Alles auswählen

curdir.s=Space(250)
GetCurrentDirectory_(250,@curdir)
If Right(curdir,1)<>"\":curdir+"\":EndIf


MDB_Create(curdir+"Test")
db=MDB_Connect(curdir,"Test","","")

If db
  qry$="Create table Info(id autoincrement,name text(100),phone text(50),constraint Info unique(id));"
  If DatabaseQuery(qry$) 
    DatabaseQuery("Insert into Info(name,phone)values('Paul','555-1234')")
    DatabaseQuery("Insert into Info(name,phone)values('Fred','555-0098')")
    DatabaseQuery("Insert into Info(name,phone)values('Joey','555-4455')")
    Else
    Debug "Data already exists"
  EndIf
 
 
  If DatabaseQuery("Select * from Info order by name asc;")
    While NextDatabaseRow()
      Debug Str(GetDatabaseLong(0))+": "+GetDatabaseString(1)+" ..."+GetDatabaseString(2)
    Wend
  EndIf
  
  CloseDatabase(db)
EndIf

MDB_Disconnect("Test")

In der PB Hilfedatei stehen 2 Links zum Thema Datenbanken...
http://www.w3schools.com/sql/default.asp
http://www.hwaci.com/sw/sqlite/lang.html

THx MJP