SQL语句不能用绝对路径,怎么办,我在vb工程里有baK文件夹里0record1.mdb拷贝到data文件夹里record1.mdb,怎么实现?请不吝赐教!
解决方案 »
- 如何在检索出来的结果集中添加一列显示列,表示自增的ID
- 某个参数不是out类型??
- mysql是否支持intersect和except集合查询
- 如何将A表信息插入B表,数据不要重复
- hql问题
- 请教一个delete语句的写法
- 在个问题在国内上怎么没有人问呀,我来问问大家看看mysql和java在unix下面连接出错的问题
- 关于创建表的问题?
- MySql 如何获取异常的消息(比如oracle的sqlerrm 或 sqlserver 的 ERROR_MESSAGE())
- 关于mysql数据库主从的配置和管理
- 我发现数据里里面boolean是tiny int,那我初始boolean的时候,把0,1放进去没关系吧
- mysql 服务启动问题
copy 所选择目录\baK\0record1.mdb \data\0record1.mdb
字符串,再执行
'数据库合并
''strname(0)目的文件名,strname(1)源文件名
Public Sub joinAccessFile(ByRef targpath As String, ByRef sourPath As String, ByRef strName() As String)
Dim requete As String, ac As String
Dim conn1 As ADODB.Connection
Dim conn2 As ADODB.Connection
Dim strcon1 As String
Dim strcon2 As String
Dim rst1 As ADODB.Recordset
Dim rst2 As ADODB.Recordset
Dim H As Integer, i As Integer, K As Integer
Dim kk As String, jj As String, str As String, str1 As String
Dim strname1 As String
strname1 = ".作业记录" requete = "select * from 作业记录"
Set conn1 = New ADODB.Connection
Set conn2 = New ADODB.Connection
strcon1 = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=false;Data Source=" & targpath & "\" & strName(0) & ""
conn1.Open strcon1
Set rst1 = conn1.Execute(requete)
str = Left(strName(0), Len(strName(0)) - 4)
strcon2 = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=false;Data Source=" & sourPath & "\" & strName(1) & ""
conn2.Open strcon2
Set rst2 = conn2.Execute(requete)
Static BB As Integer
For H = 0 To rst1.Fields.count - 1
kk = rst1.Fields(H).name
For i = 0 To rst2.Fields.count - 1
jj = rst2.Fields(i).name
If kk = jj Then
BB = BB + 1
End If
Next i
Next H
If BB < rst1.Fields.count And rst1.Fields.count <= rst2.Fields.count Then
MsgBox "字段不一致"
Else
str1 = Left(strName(1), Len(strName(1)) - 4)
ac = "insert into " & targpath & "\" & str & ".作业记录" & " select *from " & sourPath & "\" & str1 & ".作业记录"
conn2.Execute (ac)
' MsgBox "合并成功"
End If
rst2.Close
conn2.Close
rst1.Close
conn1.Close
End Sub
编译生成exe文件运行都没有问题,我用Setup Factory 7.0打包安装后,运行出现“insert into 语法错误”,定位出现在这句话上:ac = "insert into " & targpath & "\" & str & ".作业记录" & " select *from " & sourPath & "\" & str1 & ".作业记录",这里有路径问题,请大家帮忙给看看
我显示看了,是正确的
insert into [;database=c:\program files\埋缆机\data\rcord5.mdb].作业记录
select * from [;database=c:\program files\埋缆机\bak\record5\1record5.mdb].作业记录
这句该怎么改写
我改成这样还有语法错误