Set DB2 = New ADODB.Connection
DB2.ConnectionString = conn
DB2.Open
DB2.CursorLocation = adUseClient
Set rs = New ADODB.Recordset
rs.open "这里有两条SQL语句",DB2, adOpenStatic, adLockOptimistic
具体怎么写???两条分别是1:select identity(int,1,1) as id,小区名称,缴存日期,缴存单位,缴存金额,缴存页数,缴存备注 into #temp from 档案缴存情况表 where 小区名称 = '" & xqmc & "'
2:select * from #temp
在线等
DB2.ConnectionString = conn
DB2.Open
DB2.CursorLocation = adUseClient
Set rs = New ADODB.Recordset
rs.open "这里有两条SQL语句",DB2, adOpenStatic, adLockOptimistic
具体怎么写???两条分别是1:select identity(int,1,1) as id,小区名称,缴存日期,缴存单位,缴存金额,缴存页数,缴存备注 into #temp from 档案缴存情况表 where 小区名称 = '" & xqmc & "'
2:select * from #temp
在线等
解决方案 »
- 请教一下,combobox右键弹出菜单编辑菜单的问题?
- 用vb实现获取粘贴信息并且在指定excel中查找?急!!
- 求救,怎么打包注册vsflexgrid8?
- 字符处理问题还是 帮吗看看
- windows help designer怎么把project编译成chm文件
- 过年了,有高兴,有郁闷 散分
- 请问当一台短讯机和计算机的某一串口连接起来,没有作任何操作,此时串口的状态是打开还是关闭状态.
- VB6 ImgEdit,ImgEdmin,ImgScan,ImgThumb控件问题,急急急!高分求助
- MSFlexGrid和RemoteData控件问题!
- vb做的ocx能否进行反编译,请各位老大给个提示。
- 打印小票程序是否错误
- 为何用vb api获取的窗口标题为空,而SPY++却可以
if rs.state<>adstateclosed then rs.close
rs.open "select * from #temp",db2,adopenkeyset,adlockreadonly