以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 删除登陆信息 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=178720) |
-- 作者:飘过的巨蟹座 -- 发布时间:2022/7/18 1:48:00 -- 删除登陆信息 我再其他页面想删除已经登陆的信息 Static UserTable As DataTable Dim dr As DataRow = UserTable.Find("UserName = \'" & e.PostValues("用户名") & "\'") dr.Delete() 这个代码会提示报错,未将对象引用设置到对象的实例。 哪里有问题啊 用的是让登录变得更安全这个代码,UserName没有加密 [此贴子已经被作者于2022/7/18 1:48:38编辑过]
|
-- 作者:有点蓝 -- 发布时间:2022/7/18 8:28:00 -- http://www.foxtable.com/webhelp/topics/0396.htm,看示例三 |
-- 作者:飘过的巨蟹座 -- 发布时间:2022/7/18 18:04:00 -- 蓝老师,这个好像是在临时表里面找不到 |
-- 作者:飘过的巨蟹座 -- 发布时间:2022/7/18 18:04:00 -- Static UserTable As DataTable \'定义一个变量,用于存储用户随机身份ID,以及最后一次活动时间. Static ClearTime As Date If UserTable Is Nothing Then \'创建用于记录登录信息的临时表 ClearTime = Date.Now() Dim dtb As New DataTableBuilder("UserInfos") dtb.AddDef("UserName", Gettype(String), 16) dtb.AddDef("UserID",Gettype(String),16) dtb.AddDef("ActiveTime",Gettype(Date)) UserTable = dtb.Build(True) End If 找不到这个表
[此贴子已经被作者于2022/7/18 18:04:39编辑过]
|
-- 作者:有点蓝 -- 发布时间:2022/7/18 20:22:00 -- 按帮助的用法,肯定有这个表 |
-- 作者:飘过的巨蟹座 -- 发布时间:2022/7/18 22:36:00 -- ![]() ![]() |
-- 作者:飘过的巨蟹座 -- 发布时间:2022/7/18 22:36:00 -- Dim dr As DataRow dr = DataTables("UserInfos").Find("xm = admin") MessageBox.Show("姓名:" & dr("username"))
|
-- 作者:有点蓝 -- 发布时间:2022/7/18 22:46:00 -- 直接使用UserTable dr = UserTable.Find("xm = admin") |