我有2个表 check 和checksub (主细表关系)里面都有个共同得字段 CheckNo 为啥下面的SQL语句出错?"SHAPE {SELECT * FROM Check} APPEND ({SELECT * FROM Checksub} RELATE [CheckNo] TO [CheckNo])"
解决方案 »
- 测试VBA是否与SQL连接?以及将TExtbox数据存入sql表中?
- 好多程序启动时有一个很漂亮画面,怎么实现啊?
- 在程序中如何让声音延时!!
- 求助!!!急....高手指教
- 急!! 关于用VSprint8和VSReport8调用XML文件出现的错误 高分求助!
- 已知某一网站的页面上提供天气情况,有没有办法自动提取其数据(温度值),保存到数据库中
- recordset 的execute,帮我看看问题出在哪里?
- 菜鸟问题:抓取屏幕用哪个函数阿?
- 报表问题,用DATAREPORT如何实现动态报表!
- 快捷菜单后为何不能再次触发mousedown事件?
- 小弟是初学者 各位大虾能不能给小弟一个连接SQLSERVER数据库的例子
- webbrowser控件锁右键的问题
APPEND ({SELECT * FROM Checksub}
RELATE CheckNo TO CheckNo) as ch
需要加上[],改为如下就行了:
"SHAPE {SELECT * FROM [Check]} APPEND ({SELECT * FROM Checksub} RELATE [CheckNo] TO [CheckNo])"
“实时错误 '-2147217900 (80040e14)':
无效的SQL 语句了;期待 'DELETE'、………………”
出现的提示期待 'DELETE'、………………,不是这句的问题,应该是其它语句(带有Delete的那个)问题,你再看看吧
Dim adoCon As ADODB.Connection
Dim rsado As ADODB.Recordset
Dim strCon As String
Dim mySQL As StringSet adoCon = New ADODB.ConnectionstrCon = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & FilePath & ";Persist Security Info=False" adoCon.Provider = "MSDataShape"
adoCon.ConnectionString = strCon
adoCon.CursorLocation = adUseClientadoCon.OpenSet rsado = New ADODB.RecordsetmySQL = "SHAPE {SELECT * FROM [Check]} APPEND ({SELECT * FROM [Checksub]} RELATE [CheckNo] TO [CheckNo])"rsado.CursorType = 1
rsado.Open mySQL, adoCon'这里出错。
将strCon中的Provider改为Data Provider即可,即:
strCon = "DATA PROVIDER=Microsoft.Jet.OLEDB.4.0; Data Source=" & FilePath & ";Persist Security Info=False"