option explicit
function action
dim adoconn '定義ado連線物件
dim connectionstr '定義資料庫連線字串
dim sqlstr
'獲取連線資料庫字串
connectionstr="provider=msdasql.1;persist security info=true;extended properties='driver=mysql odbc 5.3 ansi driver;server=localhost;uid=root;pwd=root;database=test;port=3306'"
set adoconn = createobject("adodb.connection")
'利用資料庫連線字串開啟資料庫
on error resume next
adoconn.open connectionstr
'檢視是否連線成功，成功狀態值為1
'msgbox adoconn.state
if adoconn.state = 0 then
msgbox "連線資料庫失敗！"
else
msgbox "連線資料庫成功！"
end if
'獲取資料庫查詢語句
sqlstr = "select * from utest where id=1 "
'執行sql語句並返回對應的結果集
set adorst = adoconn.execute(sqlstr)
'獲得結果集中年齡欄位的值
msgbox adorst.fields.item("ub").value
'關閉資料庫
adoconn.close
'釋放資料庫物件
set adoconn = nothing
end function
為啥一直包資料庫連線失敗？
wincc使用vbs指令碼連線mysql資料庫
注意事項，wincc如果是32位軟體系統需要去c盤找到c windows syswow64 odbcad32.exe配置mysql資料來源，並測試，避免使用64位的odbc資料來源，不然會一直除錯不同，連線不上，其他內容基本上跟網上內容差不多，option explicit function act...
VBS 使用指令碼自動傳送郵件
email.from mail mail.com 發件人位址 email.to to mail.com 收件人位址 email.subject mail 郵件標題 email.textbody test 郵件正文 email.addattachment c abc.txt 附件 with email...
使用DOM指令碼進行下拉
亞倫 古斯塔夫森 aaron gustafson 整理了一系列有關如何使選定元素樣式化的文章 本質上，他的工作是從dom中刪除選擇並用ul代替它，然後新增指令碼和css使ul像下拉列表一樣工作。這給所有曾經抱怨過選擇不合理的人提供了明顯的好處！該系列才剛剛開始，並且存在一些問題 新元素無法切換，並且...