ecco questa è la stringa:

'OleDbConnection1
'
Me.OleDbConnection1.ConnectionString = "Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Registry Path=;Jet OLEDBatabase L" & _
"ocking Mode=1;Jet OLEDBatabase Password=;Data Source=""C:\Inetpub\wwwroot\telma" & _
"r\telmar.mdb"";Password=;Jet OLEDB:Engine Type=5;Jet OLEDB:Global Bulk Transactio" & _
"ns=1;Provider=""Microsoft.Jet.OLEDB.4.0"";Jet OLEDB:System database=;Jet OLEDB:SFP" & _
"=False;Extended Properties=;Mode=Share Deny None;Jet OLEDB:New Database Password" & _
"=;Jet OLEDB:Create System Database=False;Jet OLEDBon't Copy Locale on Compact=" & _
"False;Jet OLEDB:Compact Without Replica Repair=False;User ID=Admin;Jet OLEDB:Enc" & _
"rypt Database=False"