:eek
bReqType:=4
dbType:="Microsoft Access Driver (*.mdb)"
--数据库是Access类型
dbList:="DSN=CollegeDSN;"
--定义数据源名为CollegeDSN
dbList:=dbList^"Description=ODBC DSN;"
dbList:=dbList^"FIL=MS Access;"
dbList:=dbList^"DBQ="^FileLocation^"college.mdb"
--数据库的路径
result:=tMsDBRegister(dbReqType,dbType,dbList)
DatabaseName:="collegeDSN"
SQLString:="Select 姓名,专业,学号 From 学员表 "
ODBChandle:=ODBCOpen(WindowHandle,"ODBCError",DatabaseName,"","")
odbcdata:=ODBCExecute(ODBChandle,SQLString)
ODBCClose(ODBChandle)
如果需要远程许:QQ 59899129