Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共6 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:关于帮助文件中的“自定义用户--增加用户”

1楼
wcs 发表于:2010/9/20 16:31:00

这一段有这样的代码:

 

 

Dim UserName As String = e.Form.Controls("UserName").Value
Dim
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,无法保存成功的!

 

有好的方法能追加进去合适的值吗?

 

我不知道这个主键的值,有什么规则要遵守的。

 

能提供一个参考吗?

2楼
wcs 发表于:2010/9/20 22:47:00

没有人能回答这个问题吗?

 

没有人有过自定义的用户管理吗?

3楼
狐狸爸爸 发表于:2010/9/20 22:54:00

这些代码都是经过测试的,而且CaseStudy目录下还提供了演示文件,没有问题的。

 

用外部表,不设置主键列即可。

[此贴子已经被作者于2010-9-20 22:55:18编辑过]
4楼
wcs 发表于:2010/9/21 17:28:00

我现在暂时用的内部数据源

 

我想在发布程序时,再定向数据,这样开发方便一些,因为我要根据需要增加表,在狐表里做方便一些。

 

内部数据源的的主键值如何搞?

5楼
狐狸爸爸 发表于:2010/9/21 17:39:00
内部表没有办法,你可以用Access数据源
[此贴子已经被作者于2010-9-21 17:39:27编辑过]
6楼
wcs 发表于:2010/9/21 19:57:00
那我定向一下吧。
共6 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .03125 s, 2 queries.