页面代码：
Dim e As RequestEventArgs = args(0)
e.Resp
Dim wb As New weui
wb.AppendHTML("<script src='http://res.wx.qq.com/open/js/jweixin-1.2.0.js'></script>",True) '引入JS-SDK库
wb.AppendHTML("<script src='./lib/ajaxform_per_xianxyj_jinxing.js'></script>") '引入脚本文件 ’包含了下面要调用的函数
'在页面注入权限验证配置
Dim st As New Date(1970,1,1,8,0,0)
Dim appid As String = '"wx8acdb7df5beb68fd" '开发者ID
Dim timestamp As Integer = CInt((Date.Now - st).TotalSeconds()) '时间戳
Dim noncestr As String = Rand.NextString(16) '随机字符
Dim url As String = e.Request.URL.ToString '当前页面地址
Dim signature As String = Functions.Execute("GetJsSignature", noncestr, timestamp, url) '生成权限验证签名
Dim cfg As String = "wx.config({appId:'{0}',timestamp:{1},nonceStr:'{2}',signature:'{3}',jsApiList:['chooseImage']});"
wb.AppendHTML("<script>" & CExp(cfg,appid,timestamp,noncestr,signature) & "</script>",True)
wb.AddForm("bt3","form1","per.htm")
With wb.AddInputGroup("form1","ipg1","约见内容")
.AddHidenValue("serverId","") '确认到达上传后,返回的照片服务器id
.AddHidenValue("annhm",0) '定义,用户点击按钮的编号
With .AddInput("yaoqbh2","编号","text")
.Value = "123"
.Readonly = True
End With
End With
With wb.AddButtonGroup("form1","btg2",False)
.Add("btn1s7", "到达", "button").Attribute= ""
End With
js代码:
function validit_per_xianxyj_jinxing(idx){
alert("开始调用新增约见的js文件"); //1.点"到达"按钮，此行无法不显示
document.getElementById("annhm").value = idx
//alert("ok2");
var serverId = "";
if (idx =='3' || idx =='4'){
wx.ready(function () {
function () {
wx.chooseImage({
count: 1, // 默认9
sizeType: ['original', 'compressed'], // 可以指定是原图还是压缩图，默认二者都有
sourceType: ['album', 'camera'], // 可以指定来源是相册还是相机，默认二者都有
success: function (res) {
var localIds = res.localIds; // 返回选定照片的本地ID列表，localId可以作为img标签的src属性显示图片
alert(localIds);
//document.getElementById('up0').value = res.resultStr;
wx.uploadImage({ //2.这样调用上传，可以么？
localId:localIds // 需要上传的图片的本地ID，由chooseImage接口获得
isShowProgressTips: 1, // 默认为1，显示进度提示
success: function (res) {
serverId = res.serverId; // 返回图片的服务器端ID
alert(serverId);
document.getElementById("serverId").value = serverId;
}
});
}
});
};
});
}
wx.error(function (res) {
alert(res.errMsg);
});
var result = submitAjaxForm('form1','',false); //照片上传后，将表单发到下一个页面；在下一个页面下载、验证图片。
alert(result);
if (result =='到达!') {show('dlg1')}
else if (result =='稍候再看!') {show('dlg2')}
else if (result =='没有获得编号!') {show('dlg3')}
}
上述代码，写在记事本：
加好友 
发短信
Post By：2018/11/30 18:54:00 [只看该作者]
此主题相关图片如下：qq图片2018120111255444444444.png
