VB..........语法错误，帮忙看看，谢谢
大家帮忙看看，没有错误提示，sql2没执行的样子，主要看下DBA.DISPOSITION跟sql2，，，谢谢，在线等
VB code:
Private Sub Command1_Click()
Dim cn_db As New ADODB.Connection
Dim rs_db As New ADODB.Recordset
Dim rs_db2 As New ADODB.Recordset
Dim cn_sql As New ADODB.Connection
Dim sql As String
Dim sql2 As String
Dim dispcount As Integer
dispcount = 0
cn_db.Open "DSN=004_8V;uid=guest;pwd=guest;"
cn_db.CursorLocation = adUseClient
If cn_db.State = 1 Then
rs_db.Open "select City,Areacode,PhoneNumber,LastDisposition,LastModifiedDateTime from DBA.SAMPLE", cn_db, adOpenDynamic, adLockOptimistic
rs_db2.Open "select Disposcode,Description from DBA.DISPOSITION", cn_db, adOpenDynamic, adLockOptimistic
If rs_db.RecordCount > 0 Then
cn_sql.Open "driver={sql server};server=(local);database=tmp_cati;uid=sa;pwd=;"
'On Error Resume Next
'cn_sql.BeginTrans
Do While rs_db(3) = "18"
DoEvents
sql = "insert into 号码总库(城市,区号,号码,处理情况,接触时间) " & _
"values('" & rs_db(0) & "','" & rs_db(1) & "','" & rs_db(2) & "','" & rs_db(3) &
相关问答：
想在warcraft3里进行写屏操作【如对战平台中的胜负提示信息】，效果就像游戏平台中一样，我试过在一窗口中写入文字，然后一直让窗口强制最前，虽然能实现文字显示，但是文字会不断闪烁，而且有不确定BUG，通过论坛搜 ......
看了一些VB ini文件写入读取的方法 但是还是不知道怎么写，上面写了很长 很多，但是我不知道怎么用，我想问一下怎样写才能实现在TEXT1中写字，然后点Command1提交，然后TEXT1里面的数字就写进INI里面[Section]的Key1 ......
第一次接触CrystalReport
急寻找Vb.net Access 通过查询出的数据输出到CrystalReport的例子.
有的朋友麻烦发来学习.多谢!
跟你的要求差不多，参考一下：
http://topic.csdn.net/u/20090823/21/87af02d3-f4ca-480 ......
有没有FOR VB 水晶报表的书或是电子文档啊？有信息的朋友告诉下 谢谢了
我也没找到
如果你有 FOR 其它 的文档，也可以参考吧！
‘道理’是一致的，只是“表达方式”不同而已。
mark
pls learn from ba ......
各位好，我现在要用一台计算机同时监控32台信号接收机（用的是MOXA卡扩展32个串口）。先调试8台。现在的问题是，我有两个命令需要向接收机发送，一个是监控接收机上的信号锁定状态，一个是获取接收机目前的各类工作� ......
