主题：BeforeConnectOuterDataSource SQL连接问题

1、不是这样做的

Connections.Add("生产数据",exp)

要直接设置数据源，如

e.ConnectionString = exp

2、我这样测试没问题

Dim s As String = EncryptText("测试123", "slp", "shby")
MessageBox.Show("读取后:" & s)
Dim Val1 As String = s
MessageBox.Show("解密前:" & val1)
Dim Val2 As String = DecryptText(Val1,"slp","shby")
MessageBox.Show("解密后:" & val2)