- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 页面传值问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=176038)
-- 发布时间：2022/3/28 15:26:00
-- 页面传值问题
此主题相关图片如下：fj{~6jy7@sslbl7wng%ix5.png
想把当前行的某列的值，传送到新页面，用哪个方法好？
此主题相关图片如下：kne_rqhx5ru`m2pco5tt4.png
-- 发布时间：2022/3/28 15:37:00
--
到js函数处理
function del(){
location="list.htm?page=" + table1.pagenumber + "&deloid=" + table1.primarykey;
}
location="list.htm?page=" + table1.pagenumber + "&deloid=" + table1.primarykey;
}
-- 发布时间：2022/3/28 15:46:00
--
老师 ，我这个不是主键列，是另一列，是sureyid列。
-- 发布时间：2022/3/28 15:47:00
--
方法1、通过_identify查询到sureyid
2、把sureyid设置为前端表格的primarykey
-- 发布时间：2022/3/28 15:52:00
--
第二种方法不适合，第一种方法我是想这样得到：
Dim dr As DataRow
Dim id As String
dr = DataTables("主表").SQLFind("[_Identify] =\'\'")
If dr IsNot Nothing Then
id=dr("sureyid")
End If
但是dr = DataTables("主表").SQLFind("[_Identify] =\'\'")这句应该怎么写？这段应该放在哪个位置？
-- 发布时间：2022/3/28 15:54:00
--
dr = DataTables("主表").SQLFind("[_Identify] =" & e.getvalues("id"))
-- 发布时间：2022/3/28 16:10:00
--
还是不行，麻烦帮忙看看吧，已上传全部代码。
-- 发布时间：2022/3/28 16:11:00
--
附件
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:传值.rar |
-- 发布时间：2022/3/28 17:12:00
--
function del1(){
location="del1.htm?page=" + table1.pagenumber + "&key=" + table1.primarykey;
}
del1：
Dim e As RequestEventArgs = args(0)
Dim wb As New weui
Dim PageURL = "List1.htm?page=" &
e.GetValues("page") \'合成当前页面链接
Dim id As String
dr = DataTables("主表").SQLFind("[_Identify] =" & e.getvalues("key"))
If dr IsNot Nothing Then
id=dr("sureyid")
DataTables("主表").SQLDeleteFor("sureyid=\'" & id & "\'") 主要就是这句现在无法实现
-- 发布时间：2022/3/29 0:36:00
--
再麻烦看一下addnew2，这个函数，其中的id的值总是获取不到，已用黄色标记。
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:eventcode.rar |