VB6與SQLServer資料庫連線例項ADO

option explicit

dim gobjconn as new cado 
dim k as integer
k = gobjconn.connected("資料庫名稱", "ip位址", "sa", "sa密碼")
if k = 0 then
label1.caption = now() & "  連線--資料庫伺服器失敗！"
label1.forecolor = &h8000&
else
label1.caption = now() & "  與資料庫連線成功！"
label1.forecolor = &h8000&
end if

VB6技巧 總結

vb設定多行textbox的位置 由於自動輸入的文字比較多，最後輸入的跑到下面了，想要自動滾動到下面，本來以為 操作滾動條呢，但是沒有方法。於是我巧妙的採用了 顯示列表是設定了乙個多行 的 textbox 顯示列表.selstart len 顯示列表.text 1 顯示列表.sellength 1 ...

vb6 讀寫檔案

write file dim nhandle as integer,fname as string fname d 1.txt nhandle freefile open fname for output as nhandle print nhandle,0 print nhandle,2 clos...

VB6程式與Windows Vista的相容問題

windows vista開始逐漸進入市場，微軟對 indows xp的支援大限已經日時不多，ista的流行是勢在必然 雖著企業使用者作業系統的公升級，以前開發的visual studio basic 6程式與vista的相容性問題漸漸浮出水面 微軟在官方 上發布了windows vista 上的 ...