函数PB9.0实现自动配置ODBC数据源

odbc数据源  时间:2021-02-27  阅读:()

PB9.0实现自动配置ODBC数据源

目录

1  RegistrySet函数说明

2 程序代码

正文

摘要摘 要 利用PB函数RegistrySet实现自动配置ODBC数据源在WIN98/WINXP环境下利用PB9.0编译运行通过

关键字 PB ODBC配置数据源

本人在开发“通用考试系统”软件时通过大量的运行测试利用PowerBuilder提供的函数RegistrySet对操作系统的注册表进行读写 以达到自动配置数据源的目的。

1  RegistrySet函数说明

修改注册表信息的函数RegistrySet的语法格式为 RegistrySet

key valuename valuetype value 。其中key为字符串数值包含用户想设置的键值的健名 valuename为字符串数值在注册表中的每一个键都有一个未命名的值和若干个命名的值 valuetype为枚举类型表示在注册表中的数据类型 value用来存放修改的值。

2 程序代码

①在主窗口中定义函数其函数结构为 access选择publicReturnType选择integer FunctionName输入reg_autolink_server。

该函数实现的功能为向注册表中某个键值下的某个值名写入相应值 函数代码如下string ls_keynamestring ls_valuenamestring ls_valuestring current_dircurrent_dir = GetCurrentDirectory( )获取当前目录if mid(current_dir len(current_dir)  1)<>"""" thencurrent_dir=current_dir+"

路径未尾保证有""""符号l s_keyname=""HKEY_CURRENT_USEof twareODBCODBC. INI ODBC DataSources"lsls_value=""Adaptive Server Anywhere 8.0""可更名""MY USESysbase SQL AnyWhere 8.0"

RegistrySet(ls_keyname ls_valuename RegString! ls_value)

Regi strySet(""HKEY_CURRENT_USEoftwareODBCODBC. INIexamsystem"" ""autostop"" RegString!  ""Yes"l s_keyname=""HKEY_CURRENT_USEof twareODBCODBC. INI examsy stem"ls_valuename=""Driver""工作站驱动重要ls_value=current_dir+""dbodbc8.dll"

RegistrySet(ls_keyname ls_valuename RegString! ls_value)ls

ls

RegistrySet(ls_keyname ls_valuename RegString! ls_value)l s_valuename=""Debug"ls

RegistrySet(ls_keyname ls_valuename RegString! ls_value)ls_valuename=""DisableMultiRowFetch"

ls_value=""No"

RegistrySet(ls_keyname ls_valuename RegString! ls_value)ls_valuename=""Integrated"ls

RegistrySet(ls_keyname ls_valuename RegString! ls_value)ls_valuename=""CommLinks"

l s_value=""SharedMemory TCP IP{

RegistrySet(ls_keyname ls_valuename RegString! ls_value)l s_valuename=""EngineName"ls

RegistrySet(ls_keyname ls_valuename RegString! ls_value)l s_valuename=""PWD"

ls_value=""sql"

RegistrySet(ls_keyname ls_valuename RegString! ls_value)ls_valuename=""UID"

ls_value=""dba"

RegistrySet(ls_keyname ls_valuename RegString! ls_value)return(1)返回1表示正常结束

②为窗口对象的Open事件添加脚本

this.reg_AutoLink_Server( )首先自动配置数据源连接数据库服务器

S QLCA.DBMS = ""ODBC"

SQLCA.AutoCommit = Fal se

SQLCA.DBParm =

""ConnectString='DSN=examsystem;UID=dba;PWD=sql'connect using sqlca;open(w_login)打开用户登录窗口

编译并运行程序后可以通过控制面板的ODBC数据源管理器或注册表查看运行结果就会看到数据库已经成功的注册了。

PhotonVPS:$4/月,KVM-2GB/30GB/2TB/洛杉矶&达拉斯&芝加哥等

很久没有分享PhotonVPS的消息,最近看到商家VPS主机套餐有一些更新所以分享下。这是一家成立于2008年的国外VPS服务商,Psychz机房旗下的站点,主要提供VPS和独立服务器等,数据中心包括美国洛杉矶、达拉斯、芝加哥、阿什本等。目前,商家针对Cloud VPS提供8折优惠码,优惠后最低2G内存套餐每月4美元起。下面列出几款主机配置信息。CPU:1core内存:2GB硬盘:30GB NVm...

什么是BGP国际线路及BGP线路有哪些优势

我们在选择虚拟主机和云服务器的时候,是不是经常有看到有的线路是BGP线路,比如前几天有看到服务商有国际BGP线路和国内BGP线路。这个BGP线路和其他服务线路有什么不同呢?所谓的BGP线路机房,就是在不同的运营商之间通过技术手段时间各个网络的兼容速度最佳,但是IP地址还是一个。正常情况下,我们看到的某个服务商提供的IP地址,在电信和联通移动速度是不同的,有的电信速度不错,有的是移动速度好。但是如果...

新版本Apache HTTP Server 2.4.51发布更新(有安全漏洞建议升级)

今天中午的时候看到群里网友在讨论新版本的Apache HTTP Server 2.4.51发布且建议更新升级,如果有服务器在使用较早版本的话可能需要升级安全,这次的版本中涉及到安全漏洞的问题。Apache HTTP 中2.4.50的修复补丁CVE-2021-41773 修复不完整,导致新的漏洞CVE-2021-42013。攻击者可以使用由类似别名的指令配置将URL映射到目录外的文件的遍历攻击。这里...

odbc数据源为你推荐
雅特士中国最大的威客网是哪些?百度k站百度k站的原因是什么缓冲区溢出教程哪里可以下载黑客教程,详细网址,照片转手绘美图秀秀可以照片转手绘吗?是手机版的网店推广网站网店怎么推广?童之磊湖北中文在线数字出版有限公司怎么样?如何建立自己的网站如何建立自己的网站畅想中国20年后中国会变成什么样?--畅想一下未来的中国!!网页打开很慢为什么我打开浏览器的时候,网页打开的很慢?如何快速收录如何做到让百度快速收录
vps交流 域名抢注工具 谷歌香港 鲜果阅读 网通服务器ip 酷番云 www789 韩国代理ip atom处理器 万网注册 广州主机托管 架设代理服务器 建站论坛 iptables 硬防 vim命令 国外bt网站 百度空间登陆首页 魔兽世界网通服务器 深圳服务器维护 更多