Ⅰ 怎么用VB6通过ADO连接sql Server 2008
Set cn = New ADODB.Connection
str="Provider=SQLOLEDB.1;Password=123;Persist Security Info=True;User ID=sa;Initial Catalog=databasename;Data Source=192.168.0.1"
cn.Open str
......
cn.close
set cn=nothing
Ⅱ vb6连接sql server 2008
用adodb啊。网上查一下,多的是。但是vb6里面要引用adodb
连接字符串这样写
"Provider=SQLNCLI.1;Persist Security Info=False;Data Source=" & “服务器ip” & _
";Initial Catalog=" & “数据库名“ & ";User ID=" & ”用户名“ & _
";Password=" & ”用户密码“
Ⅲ vb6 动态查询 sqlserver 2008 R2数据库中的数据
看你的字段时间,是前面最小后面最大,假设你时间最大的是出库完成(如果不是,你自己修改下)时间范围限定应该限定最小时间字段和最大时间字段都在范围内,时间差用datediff函数,不过这玩意取整数,如果用小时为单位的话,一小时50分钟也算一小时,所以取分钟为单位
如下(假定最小日期是订单录入,最大日期是出库完成,不是的话自己修改字段名)
SQL = "SELECT * from 表名 where datediff( minute," & Combo1(1).Text & " , " & Combo1(2).Text & " )> " & Text1.Text & "*60 AND 订单录入 >= '" & _
Format(DTPicker1(0).Value, "yyyy-MM-dd") & " 0:0:1' AND 出库完成 <= '" & Format(DTPicker1(1).Value, "yyyy-MM-dd") & " 23:59:59'"
如果不知道哪个字段是最大日期哪个字段是最小日期,那就只能每个字段都加限定条件了
这是两个字段判断,继续and下去,所有字段判断一遍,都不超出范围才算
Dim SQL As String
SQL = "SELECT * from 表名 where datediff( minute," & Combo1(1).Text & " , " & Combo1(2).Text & " )> " & Text1.Text & "*60 AND (订单录入 between '" & _
Format(DTPicker1(0).Value, "yyyy-MM-dd") & "' AND '" & Format(DTPicker1(1).Value, "yyyy-MM-dd") & "') AND (订单审核 between '" & _
Format(DTPicker1(0).Value, "yyyy-MM-dd") & "' AND '" & Format(DTPicker1(1).Value, "yyyy-MM-dd") & "')"
Ⅳ 如何用VB6通过ADO连接SQL Server 2008
Set cn = New ADODB.Connection str="Provider=SQLOLEDB.1;Password=123;Persist Security Info=True;User ID=sa;Initial Catalog=databasename;Data Source=192.168.0.1" cn.Open str ...... cn.close set cn=nothing
Ⅳ 如何用VB6通过ADO连接SQL Server 2008
用ADO远程连接SQL的编写方式和局域网内部的是一样的,如果你在内网能够访问SQL的话,那么在公网上你需要在远端路由器上开启IP地址及端口映射,比如,SQL服务器的内网IP 是192.168.2.25 而外网地址是125.50.58.61 的话,你就必须在路由器上 添加125.50.58.61:443 到 192.168.2.25:443的映射记录。最好在SQL服务器上的防火墙里也添加上443端口例外。然后在程序里指定ADO的连接地址为125.50.58.61(SQL服务器的外网地址) 最后补充一下,通过公网直接访问SQL是不推荐的做法,主要是因为安全问题以及效率问题。一般的做法是在服务器端开发相应的数据服务程序,用于和客户端通信。建议你看看B/S和C/S两种架构。
Ⅵ vb6.0 访问sql2008 和sql2000
先把SQL2008服务停止,再启动SQL2000服务应该就可以了,因为默认端口都是1433
Ⅶ VB6+SQl2008 EOF出错问题,已经判断是否eof还是出错
如果数据表内没有记录,
或查询没有符合条件的记录,
也就是记录集为空时,eof和bof会同时为真。
Ⅷ vb6.0查询sql2008数据
你可以先查询输入时间的ID,然后再返回ID+1的时间就可以 了啊。