2014-03-25 155 views
0

* 爲什麼只有這樣才能工作?代碼是不工作的,因爲一些連接字符串錯誤可能是過時的驅動程序不確定請幫助任何建議很多好幫助是我已經嘗試使用驅動程序= {Microsoft Access驅動程序( .mdb,.accdb)};仍然沒有工作*vb無法連接到訪問2007 db

'Connects to the Access driver and Access database in the Inetpub 
    'directory where the database is saved 
    strProvider = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=D:\HostingSpaces\E2ESolutions\ryan.e2e.uk.com\wwwroot\asp\guestbook.mdb;" 
    'strProvider = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=D:\HostingSpaces\E2ESolutions\ryan.e2e.uk.com\wwwroot\asp\guestbook.mdb;Persist Security Info=False;" 
    'Creates an instance of an Active Server component 
    set objConn = server.createobject("ADODB.Connection") 
    'Opens the connection to the data store 
    'objConn.Open strProvider 
    'Instantiate Command object and use ActiveConnection property to 
    'attach connection to Command object 
    response.Write("working") 
    set cm = Server.CreateObject("ADODB.Command") 
    cm.ActiveConnection = objConn 
    'Define SQL query 
    cm.CommandText ="INSERT INTO Guestbook (TB1,TB2,TB3,TB4,MB1)VALUES (?,?,?,?,?)" 
    'Define query parameter configuration information for guestbook fields 
    set objparam=cm.createparameter(, 200, , 255, strTB1) 
    cm.parameters.append objparam 
    set objparam=cm.createparameter(, 200, , 255, strTB2) 
    cm.parameters.append objparam 
    set objparam=cm.createparameter(, 200, , 255, strTB3) 
    cm.parameters.append objparam 
    set objparam=cm.createparameter(, 200, , 255, strTB4) 
    cm.parameters.append objparam 
    set objparam=cm.createparameter(, 201, , iLenMB1, strMB1) 
    cm.parameters.append objparam 
    cm.execute 
    response.write("Thank you!") 
    ELSE 
    %> 
    <h1>Guestbook</h1> 
    <!--Post information to Guestbook form --> 
    <form action="" method="POST"> 
    <p>To</p> 
    <p><input type="Text" name="To"></p> 
    <p>Email Address</p> 
    <p><input type="Text" name="EmailAdd"></p> 
    <p> CC</p> 
    <p><input type="Text" name="CC"></p> 
    <p>Subject</p> 
    <p><input type="Text" name="Subject"></p> 
    <p>Message</p> 
    <p><textarea name="Memo" rows=6 cols=70></textarea></p> 
    <input type="HIDDEN" name="Message" value="True"> 
    <input type="submit" value="Submit information"> 
    </form> 
    <% 
    End if 
    %> 
    </body> 
    </html> 
    } 
+0

我知道它與連接字符串是多少呢 –

回答

0

那麼,你的連接字符串是不是很好構造。你需要引用連接字符串Click Here並嘗試一些他們的。

例如

Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\myFolder\myAccessFile.mdb; 
Persist Security Info=False; 

Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\myFolder\myAccessFile.mdb; 
Jet OLEDB:Database Password=MyDbPassword; 

Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\myAccessFile.mdb; 
Persist Security Info=False; 

ALSO - 你永遠不會建立與數據庫的連接。

例如

strProvider = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=D:\HostingSpaces\E2ESolutions\ryan.e2e.uk.com\wwwroot\asp\guestbook.mdb;" 


'What was wrong with this connection string? 
    'strProvider = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=D:\HostingSpaces\E2ESolutions\ryan.e2e.uk.com\wwwroot\asp\guestbook.mdb;Persist Security Info=False;" 


    'Creates an instance of an Active Server component 
    set objConn = server.createobject("ADODB.Connection") 


    'Uncomment here to test connection string. 
    'Opens the connection to the data store 
    objConn.Open strProvider