Foxtable(狐表) → 用户栏目 → 专家坐堂 → 同一网页读取值


  共有6372人关注过本帖树形打印复制链接

主题：同一网页读取值
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1503 积分：10158 威望：0 精华：0 注册：2013/6/8 16:19:00 		同一网页读取值  发帖心情 Post By：2022/7/16 10:36:00 [显示全部帖子]

同一网页
input（年）
input（月）

年内容变动
        For Each a月2 As String In dt.getvalues("月", "年=‘"&  e.PostValues("年") &"’")


什么实现
 回到顶部
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1503 积分：10158 威望：0 精华：0 注册：2013/6/8 16:19:00 		  发帖心情 Post By：2022/7/16 10:43:00 [显示全部帖子]

<input name='年'  >

获取<input name='年' >值
 回到顶部
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1503 积分：10158 威望：0 精华：0 注册：2013/6/8 16:19:00 		  发帖心情 Post By：2022/7/16 10:54:00 [显示全部帖子]

          Case "销进退账目.htm" '登录页面

   wb.AddForm("", "form1", "销进退账目内容.htm")
Dim a年 As String =“<select  name='年' ><option value='2021'>2021</option><option value='2022'>2022</option> </select>”


For Each a月2 As String In dt.getvalues("月","年=‘"&  e.PostValues("年") &"'")

获取不到 e.PostValues("年") 

        Next


 e.WriteString(wb.Build)
        
        
    Case "销进退账目内容.htm" '登录页面


。。。。。。。。。。。。。。。。
 回到顶部
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1503 积分：10158 威望：0 精华：0 注册：2013/6/8 16:19:00 		  发帖心情 Post By：2022/7/16 11:08:00 [显示全部帖子]

同网页什么提交

 回到顶部
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1503 积分：10158 威望：0 精华：0 注册：2013/6/8 16:19:00 		  发帖心情 Post By：2022/7/16 12:06:00 [显示全部帖子]

 Case "销进退账目.htm" '登录页面

   wb.AddForm("", "form1", "销进退账目内容.htm")
Dim a年 As String =“<select  name='年' ><option value='2021' ">2021</option><option value='2022'  oncha。nge=""setAjax。Options('月','getBra。nds.htm','年',false)"">2022</option> </select>”
  Dim a月 As String = "<input  id='月' name='月' > </input>"

        wb.InsertHTML("form1", "<div style='width:100%;height:110px;'> " & a年 & "  " & a月 & " </div>")

 wb.AppendHTML("<div id='p1' style='margin:0.1em'></div>") '插入一个div,用于显示服务器返回的 页面
        wb.AppendHTML("<script src='./lib/ajaxform.js'></script>") '引入脚本文件
        wb.AppendHTML("<script>tongji()</script>")
        e.WriteString(wb.Build)
    Case "销进退账目内容.htm" '登录页面
............................
        e.WriteString(wb.Build)
Case "getBrands.htm"
        Dim pps As String = DataTables("销进退账目").GetComboListString("月", "年='" & e.PostValues("年") & "'")
        e.WriteString(pps)
        
End Select

月没值
[此贴子已经被作者于2022/7/16 12:06:48编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1503 积分：10158 威望：0 精华：0 注册：2013/6/8 16:19:00 		  发帖心情 Post By：2022/7/16 15:18:00 [显示全部帖子]

不显示，我是放这里的，

 回到顶部
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1503 积分：10158 威望：0 精华：0 注册：2013/6/8 16:19:00 		  发帖心情 Post By：2022/7/16 16:19:00 [显示全部帖子]

document.getElementById("店名").value =什么可以取字符

 回到顶部
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1503 积分：10158 威望：0 精华：0 注册：2013/6/8 16:19:00 		  发帖心情 Post By：2022/7/16 16:42:00 [显示全部帖子]

function aa01(){
document.getElementById("月").value=document.getElementById('年').value;
}

这样什么得不岀来

 回到顶部
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1503 积分：10158 威望：0 精华：0 注册：2013/6/8 16:19:00 		  发帖心情 Post By：2022/7/16 16:57:00 [显示全部帖子]

没填id,可以了
[此贴子已经被作者于2022/7/16 17:01:19编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
qazlinle6
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1503 积分：10158 威望：0 精华：0 注册：2013/6/8 16:19:00 		  发帖心情 Post By：2022/7/16 17:13:00 [显示全部帖子]

 
function aa01(){
document.getElementById("月").value=document.getElementById('年').value;
}


Dim a月 As String = "<input  id='月' name='月' > </input>"
            msgbox(a月)


这样不行吗
 回到顶部
总数 16 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04883 秒, 5 次数据查询