module2.vb

编程环境VB.NET2005 多线程下载

Module Module2
    Dim fixStr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=123456;Data Source="
    Dim pathStr As String = "E:\VS2005\download\DownLoad\DownLoad" & "\down.mdb"
    Public connStr As String = fixStr & pathStr
End Module