vb怎樣訪問網路伺服器的access資料庫

2021-03-31 08:56:59 字數 2173 閱讀 6711

'*************************====自定義常量****************************************

private const resourcetype_disk = &h1

private const resource_global***    as long = &h2

private const resourcedisplaytype_share = &h3

private const resourceusage_connectable = &h1

'*************************====自定義結構****************************************

private type ***resource

dwscope          as long

dwtype           as long '用於指定網路的資源型別

dwdisplaytype    as long

dwusage          as long

lplocalname  as string   '指定本地裝置

lpremotename as string   '指定遠端網路名

lp***ment    as string

lpprovider   as string   '指定提供網路資源的**商

end type

'******************************===api宣告***********************************====

private declare function w***addconnection2 lib "mpr.dll" alias "w***addconnection2a" ( _

lp***resource as ***resource, _

byval lppassword as string, _

byval lpusername as string, _

byval dwflags as long _

) as long

private declare function w***cancelconnection2 lib "mpr.dll" alias "w***cancelconnection2a" ( _

byval lpname as string, _

byval dwflags as long, _

byval fforce as long _

) as long

public function funipcconn(byval strremotename as string, byval strusername as string, byval strpassword as string) as boolean

'目的:建立網路間的聯絡

'返回:  true ---- 成功

'       false --- 失敗

'注釋:strremotename為要連線的計算機名稱(如://hostname、//192.168.199.144、//hostname/data)

'     strusername為登入的使用者名稱,strpassword為登入的密碼

dim ***r   as ***resource

***r.dwscope = resource_global***

***r.dwtype = resourcetype_disk

***r.dwdisplaytype = resourcedisplaytype_share

***r.dwusage = resourceusage_connectable

***r.lpremotename = strremotename

'建立網路對映

funipcconn = iif(w***addconnection2(***r, strpassword, strusername, 0) = 0, true, false)

end function

public function funipcdisconn(byval strname as string) as long

funipcdisconn = w***cancelconnection2(strname, 0, 0)     '原樣返回api的返回值

end function

關於網路伺服器

假如我有數千萬甚至是上億的使用者資料,我想把使用者自增id和使用者名稱username放到快取裡。我的需求是,當要查詢使用者的資訊時,我想先從快取裡根據使用者名稱username獲取到使用者的id,然後再通過id在資料庫裡查詢使用者的資訊。我想當乙個使用者表達到上億的數量級別時,用自增id來查詢肯定...

網路伺服器宕機

1.伺服器程序終止 當伺服器程序終止時,伺服器傳送fin給客戶端,客戶端回以ack,客戶端進入close wait狀態,但還沒有結束連線。此時客戶端阻塞於fgets,客戶端繼續傳送buffer,伺服器傳送rst,客戶端readline返回0。而如果客戶端不理睬readline返回的rst,繼續wri...

linux網路伺服器

在本次中,學習了乙個簡單的基於tcp ip的伺服器 客戶端。在例子中,利用的是af inet域。在linux下,最常用就是af inet,af unix.af unix是linux檔案系統實現的本地要借字。後面的是可以用於包括英特網在內的tcp ip網路通訊的程式。下面來看乙個簡單的基於tcp ip...