[有难度]怎么用vb脚本进行access数据库的查询

[有难度]如何用vb脚本进行access数据库的查询
问题是这样滴：
之前生成一个html网页，有所有备份邮件的标题的链接(标题不重复)，我想做的是，根据点击链接通过使用vb脚本对数据库进行连接查询这个标题的邮件，并将这个邮件所有信息生成一个新的html显示出来，how   to   do   it   ??
if   you   know   then   you   answer   me.

以下是vb.net中连接access的代码，帮忙改成vb脚本吧，感激！！

                      Dim   sql   =   "select   *   from   [MAIL]   where   SUBJECT   =   ' "   +   SUBJECT   + " '   "
                      Dim   oleDbConnection1   As   OleDb.OleDbConnection
                        Dim   strConnect   As   String   =   "Provider=Microsoft.Jet.OLEDB.4.0;Data   Source=E:\backup.mdb "
                        oleDbConnection1   =   New   System.Data.OleDb.OleDbConnection(strConnect)
                        Dim   dp   As   OleDb.OleDbDataAdapter   =   New   OleDb.OleDbDataAdapter(sql,   oleDbConnection1)
                        Dim   dt   As   DataTable   =   New   DataTable()
                        dp.Fill(dt)


逍遥剑


------解决方案--------------------
这样:
Dim cnn as ADODB.Connection

网上搜一下,保管一大堆.
------解决方案--------------------
有分拿？
------解决方案--------------------
你可以调用一个新实例，再把邮件参数传进去
------解决方案--------------------
接分...