以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  数据库定义为变量?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=196129)

--  作者:lgz518
--  发布时间:2025/3/31 14:32:00
--  数据库定义为变量?
ADO模式可以把数据库定义为变量,在各个应用处引用?

一、Dim DBK As String = "DB01"

二、
Dim db2 = HySqGGl.DataBaseFactory.CreateDatabase("DB01") \'
可以改为
Dim db2 = HySqGGl.DataBaseFactory.CreateDatabase("DBK") \'

 
Dim db2 As HySGGql.Database = HySqGGl.DataBaseFactory.CreateDatabase("DBK", Vars("key1"), Vars("key2"))  
可以改为


Dim db2 As HySGGql.Database = HySGGql.DataBaseFactory.CreateDatabase("DBK", Vars("key1"), Vars("key2"))  

问题一:数据库定义为变量是否正确?如果正确代码要放在哪?
问题二:上面改引用是否正解?
问题三;key1,key2是可以任意比如,A1、A2,A1、A2的值,不要放在菜单全局变量,要放在系统哪里?
其变量的值:

Dim   A1   As String = "123JK00003"
Dim   A2   As String = "123JK00003001"

--  作者:有点蓝
--  发布时间:2025/3/31 14:34:00
--  
Dim db2 = HySqGGl.DataBaseFactory.CreateDatabase(DBK) 
--  作者:lgz518
--  发布时间:2025/3/31 14:54:00
--  
Dim DBK As String = "DB01"

Dim   A1   As String = "123JK00003"
Dim   A2   As String = "123JK00003001"

这些变量代码要放在系统变量哪里或管理项目的哪里?

--  作者:有点蓝
--  发布时间:2025/3/31 14:55:00
--  
http://www.foxtable.com/webhelp/topics/1842.htm
--  作者:lgz518
--  发布时间:2025/3/31 16:04:00
--  
全局代码
Dim DBK As String = "AA01"

报错
数据库配置异常!无有效的数据库设置。

--  作者:lgz518
--  发布时间:2025/3/31 16:09:00
--  
全局代码
Public DBK As String = "AA01"


窗口打开加载
Dim db = HySqGGl.DataBaseFactory.CreateDatabase("DBK") \'

查询语句


报错
数据库配置异常!无有效的数据库设置。

--  作者:有点蓝
--  发布时间:2025/3/31 16:22:00
--  
看2楼,认真看,逐个字符看