Foxtable(狐表) → 用户栏目 → 专家坐堂 → 在一个框根据名称，在另一个框自动填入内容


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

主题：在一个框根据名称，在另一个框自动填入内容
帅哥哟，离线，有人找我吗？
fubblyc
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2355 积分：16187 威望：0 精华：0 注册：2013/9/1 8:09:00 		在一个框根据名称，在另一个框自动填入内容  发帖心情 Post By：2017/6/1 9:07:00 [只看该作者]

想通过选择 某一短信模板名称后，自动根据模板名称讲模板内容填入下面的短信内容的框中。

图片点击可在新窗口打开查看此主题相关图片如下：微信截图_20170601090543.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：微信截图_20170601090252.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：微信截图_20170601090302.png
图片点击可在新窗口打开查看


短信模板名称已经自动从数据库获取：
Dim cmd As New SQLCommand
cmd.C
Dim dt As DataTable
cmd.CommandText = "SELEC T 模板名称 From {短信模板}"
dt = cmd.ExecuteReader()
Dim mbs As List(of String) = dt.GetValues("模板名称")


    With wb.AddInputGroup("form1","ipg4","选择短信模板")
        .AddSelect("短信模板","","|" & String.Join("|",mbs.ToArray))                 '.Attribute = ""  '调用js函数
    End With

[此贴子已经被作者于2017/6/1 9:10:05编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点色
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00 		  发帖心情 Post By：2017/6/1 9:38:00 [只看该作者]

 方法一：你可以把所有模板的内容都先弄到页面去，选择后显示对应的值，类似 http://www.foxtable.com/mobilehelp/scr/0100.htm

 

 方法二：你可以ajax调用后台的数据，http://www.foxtable.com/mobilehelp/scr/0108.htm

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


加好友 发短信
等级：九尾狐 帖子：2355 积分：16187 威望：0 精华：0 注册：2013/9/1 8:09:00 		  发帖心情 Post By：2017/6/1 11:22:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下：微信截图_20170601112255.png
图片点击可在新窗口打开查看

老师，我这样做，没反应，不知道哪里不对。。。

Editjl 页面代码：

Dim e As RequestEventArgs = args(0)
Dim wb As New  weui

    With wb.AddInputGroup("form1","ipg4","选择短信模板")
        With .AddInputCell("ic1") '通过InputCell增加输入框
            .AddSelect("短信模板","|" & String.Join("|",mbs.ToArray),1)
            .AddVcodeButton("填入","填入",2).Attribute="onclic k='getDate()'"
        End With
    End With
    
    Dim v As String
    Select e.PlainText
        Case "getDate" '发送纯文本
            v = "生日祝福"
            messagebox.show(v)
    End Select
    
    With wb.AddInputGroup("form1","ipg5","短信内容")
        .AddTextArea("dxnr",5).value = v
    End With

wb.AppendHTML("<script src='./lib/order.js'></script>")  '引入脚本文件
e.WriteString(wb.Build) '生成网页

order.js代码：
//测试
function getDate(){
    var result = sendAjaxText("getDate","Editjl.htm","",false);
    document.getElementById("p1").innerHTML= result;
}
[此贴子已经被作者于2017/6/1 11:25:31编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点色
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00 		  发帖心情 Post By：2017/6/1 11:29:00 [只看该作者]

1、js这样改
 
function getDate(){
    alert("123");
    var result = sendAjaxText(document.getElementById("短信模板").value,"test.htm","",false);
    alert(result);
    document.getElementById("dxnr").innerHTML= result;
}
 
2、做一个test.htm的网页接收信息
 
select case e.path
    case "test.htm"
        dim str as string = e.PlainText
        msgbox(str)
        e.WriteString("123456789")
end select
 
 
 回到顶部
帅哥哟，离线，有人找我吗？
fubblyc
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2355 积分：16187 威望：0 精华：0 注册：2013/9/1 8:09:00 		  发帖心情 Post By：2017/6/1 13:52:00 [只看该作者]

可以实现了， 谢谢老师 。 标黄色的能不能 用变量，不然模板名称就得固定死，而且增加模板后还得改代码添加。。。

图片点击可在新窗口打开查看此主题相关图片如下：微信截图_20170601130804.png
图片点击可在新窗口打开查看
    Case "test.htm"
        Selec t e.PlainText
            Case "生日祝福"                ' case document.getElementById("短信模板").value
                'Dim cmd As New SQLCommand
                'cmd.C
                'Dim dt As DataTable
                cmd.CommandText = "SELEC T * From {短信模板} where 模板名称 = '生日祝福'  "
                dt = cmd.ExecuteReader()
                dr = dt.DataRows(0)
                If dr IsNot Nothing Then
                    e.WriteString(dr("模板内容"))
                End If
        End Selec t   
[此贴子已经被作者于2017/6/1 13:53:28编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点色
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00 		  发帖心情 Post By：2017/6/1 14:05:00 [只看该作者]

js，直接把值发送过去

 

function getDate(){
    alert("123");
    var result = sendAjaxText(document.getElementById("短信模板").value,"test.htm","",false);
    alert(result);
    document.getElementById("dxnr").innerHTML= result;
}
 
你直接获取 e.plainText 不就好了？
 回到顶部
帅哥哟，离线，有人找我吗？
fubblyc
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2355 积分：16187 威望：0 精华：0 注册：2013/9/1 8:09:00 		  发帖心情 Post By：2017/6/1 14:59:00 [只看该作者]

明白了！！谢谢！！

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04797 秒, 4 次数据查询