VB Access导出数据到DB2 - VB / 基础类
我想从Access 导出数据到DB2， 比如说Access表中有3条数据，我要导入DB2，并且要删除。 但是插入3行可以成功，删除只能删除1行，并且第一行删除3遍（因为有3条数据）。 代码如下：恳请各位高手指点一二，小弟感激不尽，谢谢！
VB code:
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim sql As String
Dim I As Integer
Set db = CurrentDb
'delete the record with the reloaded key seg -> seq -> ct
sql = "select distinct ctry_cd,tax_cd,tax_type_cd from " & strDataTblName
Set rs = db.OpenRecordset(sql)
For I = 0 To rs.RecordCount - 1
'x1
sql = "delete * from " & TAX_RULE_SEG
sql = sql & " where ctry_cd='" & rs("ctry_cd") & "'"
sql = sql & " and tax_cd='" & rs("tax_cd") & "'"
sql = sql & " and tax_type_cd='" & rs("tax_type_cd") & "'"
db.Execute sql
sql = "delete * from " & TAX_RULE_SEQ
sql = sql & " where ctry_cd='" & rs("ctry_cd") & "'"
sql = sql & " and tax_cd='" & rs("tax_cd") & "'"
sql = sql & " and tax_type_cd='" & rs("tax_type_cd") &a
相关问答：
怎么把已知的数据保存成xml文件，现在已知的数据是
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xmlns:o=& ......
xmlDoc1.loadXML(h)总是返回false，为什么？谢谢帮忙回答一下
h是什么呢。。。。。。。。。
h是xml格式的字符串
你是想打开。XML格式的文件吧？
我是把h放在xmlDoc1里，用xmlDoc1.loadXML(h)，然后取xmlDo ......
问题：
现在Access数据库中有两张表TableA和TableB
TableA中有记录如下:
字段1(Name) 字段2(Num)
A 3
A 4
B 6
... ......
现在小弟在用vb6.0编写程序，遇到异步的问题，具体如下：
点击按钮A时，调用外部的dll(C++)，此dll是同步返回数据。此时如果远程未响应，我的程序界面就会卡死。因此我想到用timer来实现异步 ，但是不清楚具体的实� ......
