以文本方式查看主题
- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- Q:新问题,设置登入界面的时候出现这个错误 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=20600)
|
-- 作者:hp001
-- 发布时间:2012/6/13 14:30:00
-- Q:新问题,设置登入界面的时候出现这个错误
狐爸,请看看,设置登入界面的时候出现这个,有碰到过吗,我的是SQL2000 此主题相关图片如下:360截图20120613142802687.jpg
|
-- 作者:狐狸爸爸
-- 发布时间:2012/6/13 14:34:00
--
很明显,合成的连接字符串有问题。 你设置好数据源,然后删除BeforeConnectOuterDataSource事件中的代码看看。
[此贴子已经被作者于2012-6-13 14:36:01编辑过]
|
-- 作者:hp001
-- 发布时间:2012/6/13 14:36:00
--
那具体是在那里设置呢。我传例子有点麻烦,带数据库的
|
-- 作者:hp001
-- 发布时间:2012/6/13 14:39:00
--
登入窗口的确定按钮
Dim UserName As String = e.Form.Controls("UserName").Value Dim cmd As New SQLCommand Dim dt As DataTable Dim dr As DataRow cmd.C If UserName = "" Then Messagebox.show("请选择用户!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information) Return End If cmd.CommandText = "Select * From {S用户权限} Where [职务] = \'" & UserName & "\'" dt = cmd.ExecuteReader dr = dt.DataRows(0) If e.Form.Controls("PassWord").Value = dr("密码") Then _UserName = dr("职务") _UserGroup = dr("所在部门") e.Form.Close Else Messagebox.show("密码错误!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information) End If
|
-- 作者:狐狸爸爸
-- 发布时间:2012/6/13 14:43:00
--
和登录窗口无关,你的错误提示发生在打开项目的时候
|
-- 作者:hp001
-- 发布时间:2012/6/13 14:45:00
--
If e.name = "Hperp" Then e.C";Persist Security Info=True;User ID=sa;Initial Catalog=Hperp;Data Source=192.168.1.222" End If
|
-- 作者:hp001
-- 发布时间:2012/6/13 14:46:00
--
BeforeConnectOuterDataSource,在这个位置设置的
|
-- 作者:hp001
-- 发布时间:2012/6/13 14:47:00
--
If e.name = "Hperp" Then e.C";Persist Security Info=True;User ID=sa;Initial Catalog=Hperp;Data Source=192.168.1.222" End If
|
-- 作者:hp001
-- 发布时间:2012/6/13 14:48:00
--
这个就是项目属性的设置 此主题相关图片如下:360截图20120613144657296.jpg
|
-- 作者:狐狸爸爸
-- 发布时间:2012/6/13 14:50:00
--
就是这段合成的连接字符串出问题了,你先不要用代码合成,删除这些代码,直接在菜单中设置好数据源
|