怎样动态的设置数据环境的连接字符串？[急]

Question

具体的我忘了，
但您留E_MAIL给我,明天给你完整的代码
大概如下:
假设数据环境为DE
数据边接为CN
命令为COM
设计时正确地设置好数据环境
运行时
Sub subRefreshDE()
ON ERROR GOTO ERRHANDLE
de.cn.connectstring=CONNECTSTRING 
DE.CN.OPEN
DE.COM.COMMANDTEXT=COMMANDTEXT ' 该COMMANDTEXT要与你设计时的相同  
DE.COM
.......
DE.CN.CLOSE
EXIT SUB
ERRHANDLE:
if err='该处错误号对应的主题为'如果对象已经打开则不允许操作'' THEN
   DE.CN.CLOSE
   RSUME NEXT
ELSEIF ERR='该处错误号对应的主题为'如果对象已经关闭则不允许操作''THEN
   DE.CN.OPEN
   RESUME NEXT 
END IF

Answer 1

补充:
DE.COM.COMMANDTEXT=COMMANDTEXT ' 该COMMANDTEXT要与你设计时的相同  
只是显示的字段要相同

Answer 2

我的E-mail地址是[email protected]
谢谢