With wb.AddTable("","Table1")
.attribute ="table border='1'style = 'text-align:center;line-height: 120% '"
.PageNumber = page '设置页码
.ActiveSheet = "menu" '指定菜单
.Primarykey = "_Identify" '指定主键,只要是能唯一区分行的列即可,并非一定要表的实际主键.Functions.Execute("edit")
.CreateFromDataTable(dt, False,"","","班级","身份证件号","学生姓名")
End With
With wb.AddActionSheet("","menu")
.Add("mnuEdit", "编辑信息").Attribute =""
.Add("mnuEdit", "相片采集").Attribute =""
'.Attribute =""
.Add("mnuDelete", "删除信息").Attribute ="""
If Filter = "" Then
.Add("mnuFilter","筛选学生").Attribute = ""
Else
.Add("mnuUnFilter","撤销筛选","xlist.htm?page=0&unfilter=true")
End If
.Add("mnuStatistics", "人数统计","xsrstj.htm")
.Add("mnuCancel","取消","",True)
End With
With wb.AddDialog("","dlg1", "删除确认","您确定要删除当前学生信息吗?")
.AddButton("btnCancel","取消").Kind = 1
.AddButton("btnOK","确定").Attribute = ""
End With
wb.AppendHTML("<script src='./lib/order.js'></script>") '引入脚本文件
e.WriteString(wb.Build)
老师，请问表格主键为_Identify,请问如何将选定的行的身份证号写入cookies，以其他页面调用，而不用js的方式
加好友 
发短信
Post By：2017/9/16 16:02:00 [只看该作者]
