- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 从一个页面传输主键值到另外一个页面 没有传输成功 求解！ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=150619)
-- 发布时间：2020/6/3 11:20:00
-- 从一个页面传输主键值到另外一个页面 没有传输成功 求解！
从一个页面传输主键值到另外一个页面 没有传输成功 求解！
以下内容是专门发给有点蓝浏览
……
For Each dr As DataRow In dt.DataRows
With .body.AddRow()
.Primarykey =dr("_Identify")
……
可以得到值 如94
怎么将这个主键值传输给getxuexi函数里面呢？
js文件里面
function getxuexilist(){
location="getxuexilist.htm?page=" + table1.pagenumber + "&key=" + table1.primarykey;
}
getxuexi函数
……
Dim e As RequestEventArgs = args(0)
Dim wb As New weui
Dim PageNumber As Integer = e.GetValues("page")
Dim PrimaryKey As Integer = e.GetValues("key")
Dim PageURL = "getxuexiList.htm?page=" & PageNumber
wb.AppendHTML("<script src=\'./lib/ajaxform.js\'></script>") \'引入脚本文件
MessageBox.Show(PrimaryKey)
……
提示为0
[此贴子已经被作者于2020/6/3 11:22:00编辑过]
-- 发布时间：2020/6/3 11:46:00
--
js文件里面
function getxuexilist(){
location="getxuexi.htm?page=" + table1.pagenumber + "&key=" + table1.primarykey;
}
-- 发布时间：2020/6/3 11:53:00
-- 回复：（有点蓝）js文件里面function getxuexilist(){...
更改如楼上 也是一样没有弹出值
换成写内容部函数yuedu的方式
Dim e As RequestEventArgs = args(0)
Dim wb As New weui
Dim PageNumber As Integer = e.GetValues("page")
Dim PrimaryKey As Integer = e.GetValues("key")
Dim PageURL = "getxuexiList.htm?page=" & PageNumber
MessageBox.Show(PrimaryKey)
运行
With wb.AddActionSheet("","menu") \'设计菜单
.Add("mnudAdd", "增加订单","getxuexi.htm")
.Add("yuedu", "阅读").Attribute ="on c lic k=\'getxuexilist()\'"
或
.Add("yuedu", "阅读").Attribute ="on c lic k=\'yuedu()\'"
还是一样 没有弹出值
还得麻烦老师继续指导
[此贴子已经被作者于2020/6/3 12:19:56编辑过]
-- 发布时间：2020/6/3 13:30:00
--
js文件发上来
-- 发布时间：2020/6/3 14:39:00
-- 回复：（有点蓝）js文件发上来
麻烦老师指导
以下内容是专门发给有点蓝浏览
-- 发布时间：2020/6/3 15:48:00
--
function getxuexilist(){
location="getxuexi.htm?page=" + table1.pagenumber + "&key=" + table1.primarykey;
}
function getxuexi(){
location="getxuexi.htm?page=" + table1.pagenumber + "&key=" + table1.primarykey;
}
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:测试(2).zip |
-- 发布时间：2020/6/3 16:15:00
-- 回复：（有点蓝）function getxuexilist(){ &nb...
点击getxuexilist页面后 然后点击编辑订单菜单项
.Add("mnuEdit", "编辑订单","getxuexi.htm").Attribute ="on c li ck=""getxuexi();"""
得到的主键值 还是0
以下内容是专门发给有点蓝浏览
-- 发布时间：2020/6/3 16:27:00
--
我测试没有问题
-- 发布时间：2020/6/4 9:11:00
-- 回复：（有点蓝）function getxuexilist(){ &nb...
经过反复检查和测试 还是没有得行 依旧是主键值传输为零 继续求解
整个操作过程是 打开登录页面 进行页面登录后 点击学习内容 然后到达getxuexilist页面 然后选择删除订单 都可以弹出主键值 选择编辑订单 无提示 代码应该是直接调用js传递主键值 点击编辑订单后 立马点击新增订单 getxuexi页面 结果没有得到key值 也就是主键值弹出为零
还麻烦有点蓝老师指导一下 这个问题我折腾了好几天 都没有自行找到路子
以下内容是专门发给有点蓝浏览
-- 发布时间：2020/6/4 9:27:00
--
把js文件里这段js全部去掉，看不懂的东西不要乱用，测试通过再使用
function setCookie(主键,table1.primarykey,s20)
{
var strsec = getsec(time);
var exp = new Date();
exp.setTime(exp.getTime() + strsec*1);
document.cookie = name + "="+ escape (value) + ";expires=" + exp.toGMTString();
}
[此贴子已经被作者于2020/6/4 9:27:10编辑过]