VB6与SQLServer数据库连接实例ADO
发布日期:2022-02-06 00:27:13
浏览次数:42
分类:技术文章
本文共 392 字,大约阅读时间需要 1 分钟。
Option ExplicitDim gobjConn As New cADO Dim k As Integer k = gobjConn.Connected("数据库名称", "IP地址", "sa", "sa密码") If k = 0 Then Label1.Caption = Now() & " 连接--数据库服务器失败!" Label1.ForeColor = &H8000& Else Label1.Caption = Now() & " 与数据库连接成功!" Label1.ForeColor = &H8000& End If
连接数据库就是这么简单,同时支持vb.net,VB.NET先引用YYData.dll,vb6直接系统注册一下 regsvr32 YYData.dll。
转载地址:https://blog.csdn.net/weixin_46184596/article/details/103953463 如侵犯您的版权,请留言回复原文章的地址,我们会给您删除此文章,给您带来不便请您谅解!
发表评论
最新留言
第一次来,支持一个
[***.219.124.196]2024年03月23日 16时00分27秒
关于作者
喝酒易醉,品茶养心,人生如梦,品茶悟道,何以解忧?唯有杜康!
-- 愿君每日到此一游!
推荐文章
如何实现java文档注释_JavaDoc注释与帮助说明文档
2019-04-21
java判断ipv6地址类型_IPv6地址类型与格式
2019-04-21
linux java jdk_linux安装JDK
2019-04-21
JAVA中math的作用_Java中Random 和 Math 的概述及使用(二十六)
2019-04-21
mysql排序rank_MySQL_实现组内排序-Oracle中的rank()函数的功能
2019-04-21
linux 模拟键盘输入到进程,Linux 下模拟键盘输入
2019-04-21
linux服务器上已安装R 用户下载R包,R语言安装R package的2种方法
2019-04-21
linux下mysql 备份方法,Linux下mysql数据库备份方法小结
2019-04-21
肺部ct重建_胸片检查容易漏诊肺癌,去年正常今年晚期常发生,体检一定要做CT...
2019-04-21
x86so文件装换成arm64位_64位系统正式发布说明及介绍!!
2019-04-21
for循环中取出最大最小 累加_LeetCode之长度最小的子数组
2019-04-21