以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 关于帮助文件中的“自定义用户--增加用户” (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=8233) |
-- 作者:wcs -- 发布时间:2010/9/20 16:31:00 -- 关于帮助文件中的“自定义用户--增加用户” 这一段有这样的代码:
Dim UserName As String = e.Form.Controls("UserName").ValueDim UserGroup As String = e.Form.Controls("UserGroup").Value Dim PassWord As String = e.Form.Controls("PassWord").Value Dim cmd As New SQLCommand cmd.ConnectionName = "User" If UserName = "" OrElse UserGroup = "" Then Messagebox.show("请输入用户名和用户分组!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information) Return End If cmd.CommandText = "Insert Into {Users} ([Name],[Group],[Password]) Values (\'" cmd.CommandText = cmd.CommandText & UserName & "\',\'" & UserGroup & "\',\'" & Password & "\')" If cmd.ExecuteNonQuery = 1 Then \'返回1表示增加成功 If Forms("用户管理").Opened Then With Forms("用户管理").Controls("ListBox1") .Items.Add(UserName) .SelectedIndex = .Items.Count -1 End With End If e.Form.Close() Else Messagebox.show("增加用户失败, 可能存在同名用户!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information) End If
意思是把窗口中的值,用Insert Into 追加到数据库中
但是它没有考虑狐表数据库的主键_identify,无法保存成功的!
有好的方法能追加进去合适的值吗?
我不知道这个主键的值,有什么规则要遵守的。
能提供一个参考吗? |
-- 作者:wcs -- 发布时间:2010/9/20 22:47:00 -- 没有人能回答这个问题吗?
没有人有过自定义的用户管理吗? |
-- 作者:狐狸爸爸 -- 发布时间:2010/9/20 22:54:00 -- 这些代码都是经过测试的,而且CaseStudy目录下还提供了演示文件,没有问题的。
用外部表,不设置主键列即可。 [此贴子已经被作者于2010-9-20 22:55:18编辑过]
|
-- 作者:wcs -- 发布时间:2010/9/21 17:28:00 -- 我现在暂时用的内部数据源
我想在发布程序时,再定向数据,这样开发方便一些,因为我要根据需要增加表,在狐表里做方便一些。
内部数据源的的主键值如何搞? |
-- 作者:狐狸爸爸 -- 发布时间:2010/9/21 17:39:00 -- 内部表没有办法,你可以用Access数据源 [此贴子已经被作者于2010-9-21 17:39:27编辑过]
|
-- 作者:wcs -- 发布时间:2010/9/21 19:57:00 -- 那我定向一下吧。 |