vb應用程序訪問sqlserver方法探討(2)

字號:

用odbc api編程
    odbc(open database connectivity)的思想是訪問異種數(shù)據(jù)庫的一種可移植的方式。與數(shù)據(jù)資源對話的公用函數(shù)組裝在一個稱為驅(qū)動程序管理器(odbc.dll)的動態(tài)連接中。應用程序調(diào)用驅(qū)動程序管理器中的函數(shù),而驅(qū)動程序管理器反過來通過驅(qū)動器反過來通來驅(qū)動器(sqlsrvr.dll)把它們送到服務器中。
    用odbc api編程,設(shè)為首頁一般要用到以下一些函數(shù)。下面列出了常用的函數(shù)以及它們的功能。
    下面的代碼使用上面一些函數(shù)先登錄到一個服務器數(shù)據(jù)庫,并為隨后的工作設(shè)置了語句句柄。
    global gihenv as long
    global gihdb as long
    global gihstmt as long
    dim myresult as integer
    dim myconnection as srting
    dim mybuff as string*256
    dim mybufflen as integer
    if sqla||ocenv(gihenv)<>sql_success then
    msgbox"a||ocation couldn’t happen!"
    end if
    if sql||occonnect(gihenv,gihdb)<>sql_success then
    msgbox "sql server couldn’t connect!"
    end if
    myconnection="dsn=myserver;uid=|c|;pwd=;app=odbctest;ws|d=lcl;
    database=sales"
    myresult=sqldriverconnect(gihdb,test,form1.hwnd,myconnection
    .len(myconnection),
    mybuff,256,mybufflen,sql_driver_complete_requied)
    myresult=sqla||ocstmt(gihds,gihstmt)
    myresult=sqlfreestmt(gihstmt,sql_colse)
    rssql="select*from customers where city="wuhan""
    myresult=sqlexecdirect(gihstmt,rssql,len(rssql))