Foxtable(狐表)用户栏目专家坐堂 → AddDialog提示确认


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

主题:AddDialog提示确认

帅哥哟,离线,有人找我吗?
ycs5801
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1065 积分:7592 威望:0 精华:0 注册:2009/6/24 9:44:00
AddDialog提示确认  发帖心情 Post By:2024/7/22 13:59:00 [显示全部帖子]

For Each dr As DataRow In drs           
...
...
...
                .RightFooter.AddFoot("选课").Attribute = "style=""color:  #206040;font-size:18px;width:30px;writing-mode: horizontal-tb;padding-right:20px;"" & openid & "','" & dr("课程名称") & "','" & dr("课程类别") & "','" & dr("授课老师") & "','" & dr("授课时段") & "')"""
                                     
        Next

 With wb.AddDialog("", "dlg1", "约课确认", "您确定约课吗?")
        .AddButton("btnCancel", "取消").Kind = 1
        .AddButton("btnOK", "确定").Attribute = """
    End With

我想在点击选课按钮后,先show('dlg1'),如果点是,再运行sendjosnobject函数,但是如果这样是不是需要额外新建几个变量,在点击的时候进行赋值才行。上边代码需要怎样修改?

 回到顶部
帅哥哟,离线,有人找我吗?
ycs5801
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1065 积分:7592 威望:0 精华:0 注册:2009/6/24 9:44:00
  发帖心情 Post By:2024/7/22 16:21:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:新建文本文档.txt


 回到顶部
帅哥哟,离线,有人找我吗?
ycs5801
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1065 积分:7592 威望:0 精华:0 注册:2009/6/24 9:44:00
  发帖心情 Post By:2024/7/22 19:09:00 [显示全部帖子]

dim a as string
dim b as string
dim c as string
For Each dr As DataRow In drs           
...
...
...
a=dr("课程名称")
b=dr("课程类别")
c=dr("授课老师")
                .RightFooter.AddFoot("选课").Attribute = "style=""color:  #206040;font-size:18px;width:30px;writing-mode: horizontal-tb;padding-right:20px; on click=""show('dlg1')""
                                     
        Next

 With wb.AddDialog("", "dlg1", "约课确认", "您确定约课吗?")
        .AddButton("btnCancel", "取消").Kind = 1
        .AddButton("btnOK", "确定").Attribute = "on click=""sendJsonObject(a,b,c)"""
    End With

这样可以吗?提前先设置几个变量 ,这几个变量能不能保证是点击的那条数据中的

 回到顶部
帅哥哟,离线,有人找我吗?
ycs5801
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1065 积分:7592 威望:0 精华:0 注册:2009/6/24 9:44:00
  发帖心情 Post By:2024/7/22 20:23:00 [显示全部帖子]

var openid; //后台传过来的所有参数
var kcmc;
var kclb;
var skls;
var sksd;

    function sendJsonObject(openid,kcmc,kclb,skls,sksd){  
      openid=openid;
       kcmc=kcmc;
       kclb=kclb;
       skls=skls;
       sksd=sksd;
 console.log(kcmc);
       show('dlg1');
       // show("tst1",2000);
     }
   function queren(){ //向后台发送数据
     show("tst1",2000);
      
        console.log(kcmc);
    var obj=new Object();
    obj.openid = openid;
    obj.kcmc=kcmc; 
    obj.kclb=kclb; 
    obj.skls=skls; 
    obj.sksd=sksd;  
    var result = sendAjaxJSON(obj,"yuekejieshou.htm",'aftersubmit',false);
    }   

第一个黄色部分还可以正常显示,第二个就显示未定义了,咋回事

 回到顶部
帅哥哟,离线,有人找我吗?
ycs5801
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1065 积分:7592 威望:0 精华:0 注册:2009/6/24 9:44:00
  发帖心情 Post By:2024/7/22 20:40:00 [显示全部帖子]

 With wb.AddDialog("", "dlg1", "约课确认", "您确定约课吗?")
        .AddButton("btnCancel", "取消").Kind = 1
        .AddButton("btnOK", "确定").Attribute = """
    End With

这个点完确认或者取消,为什么对话框不关闭。

 回到顶部