2011-07-27 95 views
1

我使用Access 2002與未綁定的表單和鏈接到Internet上的MySql後端的表。我試圖用這個代碼更新表,但它不會更新。任何幫助讚賞。謝謝。訪問和MySQL

Dim PhoneSQL As String 
DoCmd.SetWarnings False 
MySql(Connect,"uclock.db.7713143.hostedresource.com,urlock,Admin33334) 
PhoneSQL = "UPDATE tblClients SET tblClients.MainPhone = `enter code here`Forms!frmEditAddress!TxtPhone " & _ 
"WHERE tblClient.ClientID = Forms!frmEditPhone!TxtClientID;" 
DoCmd.RunSQL (PhoneSQL) 
DoCmd.SetWarnings True 
mySql(close) 
+0

DSTR3您需要提供更多詳細信息才能提供幫助。 –

+1

使用未綁定表單的任何特定原因?鏈接表格會讓你的生活更輕鬆! –

+0

我覺得「通過互聯網」的一部分是不使用綁定表單的一個很好的理由。 –

回答

0

你在這裏缺少一個右引號:

MySql(Connect,"uclock.db.7713143.hostedresource.com,urlock,Admin33334) 
              -----------------------^^^^ 

的語法高亮背叛了錯誤。希望你正在IDE或文本編輯器中使用適當的VBA語法高亮顯示。

看到其他問題:

引用不當周圍的形式價值PhoneSQL

PhoneSQL = "UPDATE tblClients SET tblClients.MainPhone = `enter code here`Forms!frmEditAddress!TxtPhone " & _ 
"WHERE tblClient.ClientID = Forms!frmEditPhone!TxtClientID;" 

應該

PhoneSQL = "UPDATE tblClients SET tblClients.MainPhone = `enter code here`Forms!frmEditAddress!TxtPhone " & _ 
"WHERE tblClient.ClientID = " & Forms!frmEditPhone!TxtClientID & ";" 

而且沒有MySQL()功能。由於你的表是鏈接的,你不需要建立任何新的數據庫連接。

+0

謝謝。這種幫助。但是,我認爲更多的是缺失。它仍然不會更新。它的說法功能沒有定義? – DSTR3

+1

@ DSTR3函數'MySQL()'是什麼?這不像我曾經見過的任何連接到VBA數據庫的東西 –

+0

我在C++中使用它,所以我只是想我會嘗試它!錯,我猜!無論如何,我已經準備好了這些帶有SQL語句的未綁定表單,我的表格已鏈接,並且可以直接在表格中進行更新,所以我的連接很好。自從我有沒有綁定的表單以後,我有什麼要做的嗎?什麼是正確的過程或語法?已經找了兩天了! – DSTR3