十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
1、建立一个txt文档
创新互联公司是专业的天坛街道网站建设公司,天坛街道接单;提供成都网站建设、成都网站制作,网页设计,网站设计,建网站,PHP网站建设等专业做网站服务;采用PHP框架,可快速的进行天坛街道网站开发网页制作和功能扩展;专业做搜索引擎喜爱的网站,专业的做网站团队,希望更多企业前来合作!
2、改扩展名为*.udl
3、双击运行-》提供程序SQL Native Client
4、连接-》数据源为当前sql 服务器
5、设置登陆方式
6、选择连接的数据库
7、测试连接
8、关闭
9、用记事本打开
10、把记事本里的内容 由provider···开始复制到constring
"Driver={Microsoft ODBC for Oracle};Server=OracleServer.world;Uid=Username;Pwd=asdasd;"
Dim da As String = "SELECT Count(检测项目) FROM b where 检测项目='cc'"
这句写错啦,你直接传送的是检测项目为字符串"cc"的参数,并不是你程序写的CC参数
改为:
Dim da As String = "SELECT Count(检测项目) FROM b where 检测项目='" cc "'"
建议通过程序组织的sql语句可以通过msgbox da 弹出来看看,这样你较容易查出是什么错误,较长的就用textbox1.text=da来看了,不过记得设置断点"exit sub"
使用ACCESS数据库的日期列比较,应为:
"select * from 表 where 日期列=" "#" cdate(textbox1.text) "#"
注意前后两个“#”号
使用sqlserver
"select * from 表 where 日期列=" "'" cdate(textbox1.text) "'"
当然日期格式要注意,如长短日期等。
日期期间:between 小日期 and 大日期(记得加#号)
vb中可以使用+连接字符串,
也可以使用连接字符串,
建议使用连接字符串,以区别数学运算符+。
Provider=Microsoft.ACE.OLEDB.4.0;Data Source=|DataDirectory|\Temp\aaa.accdb;Persist Security Info=True
或
Provider=Microsoft.ACE.OLEDB.4.0;Data Source=|DataDirectory|\Temp\aaa.accdb;Persist Security Info=True
或
Provider = Microsoft.Jet.OLEDB.4.0;Data Source ="E:\Program Files\Microsoft Office\OFFICE11\SAMPLES\Northwind.mdb"
需要注意的问题。
文件夹路径中出现的空格处理,要加引号。
竖线是用来包括系统内置路径的,不能用作文件夹分隔符。
其它的没有什么大问题。