请问vbscript如何连接Access数据库？

求完整的连接语句，主要是想知道Conn应该如何定义
回答前请看清题目，我问的是vbscript如何连接，而不是如何用asp连接
那些回答Server.CreateObject的就请不要浪费彼此的时间了，谢谢

其实就是去掉server就可以了.
比如 connstr="DBQ=db.mdb;DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
Set conn=CreateObject("ADODB.CONNECTION") '这里只是去掉server,照样可以连接
conn.open connstr
'连接试试看
set rs=createobject("Adodb.RecordSet")
sql="select * from news"
rs.open sql,conn,1,1
do while not rs.eof
msgbox rs("title")'这里是循环输出标题,vbs能用msgbox弹出.
rs.movenext
loop
rs.close
conn.close
set rs=nothing
set conn=nothing
msgbox "完毕"