02
2018
11

asp微信jssdk上传图片,asp上传自动压缩图片,是通过微信上传的

asp微信jssdk上传图片,asp上传自动压缩图片,是通过微信上传的

微信JS-SDK图片上传代码ASP版,jssdk上传图片接口源码,每次可以上传9张图片,并且微信可以自动压缩照片,让原本几M的照片变成几十k的图片,并且像素还很高,高清,上传后自动保存到本地服务器,这个上传代码是asp的,网络上并不多的源码,由其是微信大部分支持的是php,我写的这个源码是根据php转成asp的。

02
2018
11

asp微信公众号模板消息推送开发源码下载,程序是asp写的

asp微信消息模板推送开发源码下载,程序是asp写的

微信模板消息,就是微信公众号关注后,登录或是用户有些操作,会给用户推送一条提示信息,见图片,asp的代码,直接下载使用asp微信模板消息发送

02
2018
11

asp微信jssdk上传图片asp程序源码

互相学习电话微信:18611436777(加微信注明事由)

微信jssdk上传图片asp程序源码

02
2018
11

asp微信公众号群发推送客服消息源码

asp微信公众号群发推送客服消息源码,微信的客服消息推送目前已修改为48小时有效,只有和你公众号互动在48小时以内的用户才可以收到客服消息。

02
2018
11

asp获取微信公众号用户的头像和微信名及openid源码

asp获取微信公众号用户的头像和微信名及openid源码,asp写的,可以获取用户的头像和微信名,性别及openid等

<script language="jscript" runat="server">
function getjson(str){
try{
eval("var jsonStr = (" + str + ")");
}catch(ex){
var jsonStr = null;
}
return jsonStr;
}
</script>
<%
'==================================
'=类 名 称:微信登录
'=功 能:微信登录 For ASP
'=作 者:18611436777
'=微信:18611436777
'=日 期:2014-3
'==================================
'转载时请保留以上内容!!
Class WxAPI
Private APPID
Private APPSECRET
Private CALLBACK_URL
Private SCOPE

Private Sub Class_Initialize 
APPID = "wxe4a757eaba87d647"'APP ID
APPSECRET = "9a2f4790e1fe303dc500bf63bf5bad51"'APP KEY
CALLBACK_URL = "http://www.muyunet.com/weixin/user2.asp"'REDIRECT_URI
SCOPE ="snsapi_userinfo" '授权项snsapi_userinfo,snsapi_base

End Sub
'Microsoft.XMLHTTP
'Get方法请求url,获取请求内容
Private Function RequestUrl(url)
Set XmlObj = Server.CreateObject("Microsoft.XMLHTTP")
XmlObj.open "GET",url, false
XmlObj.send
If XmlObj.Readystate=4 Then
RequestUrl = XmlObj.responseText
Else
Response.Write("xmlhttp请求超时!") 
Response.End()
End If
Set XmlObj = nothing
End Function


Private Function CheckData(data,str)
If Instr(data,str)>0 Then
CheckData = True
Else
CheckData = False
End If
End Function


'生成登录地址
Public Function GetAuthorization_Code()
Dim url, params
url = "https://open.weixin.qq.com/connect/oauth2/authorize"
params = "appid="&APPID
params = params & "&redirect_uri=" & server.URLEncode(CALLBACK_URL)
params = params & "&response_type=code"
params = params & "&scope="&SCOPE
params = params & "&state=123#wechat_redirect"
url = url & "?" & params
GetAuthorization_Code = (url)
End Function

02
2018
11

ASP微信支付v4.0版本,最新的asp微信公众号支付源码

ASP微信支付v4.0版本,最新的asp微信公众号支付源码,不需要安装证书,只要一个文件用到.net环境就可以用

02
2018
11

asp微信公众号电子会员卡源码,可用于美容会所,理发店,汽车俱乐部,旅游公司等

<%
Response.Charset = "GB2312"
Code = Trim(Request.QueryString("code"))
'Response.Write(Code&"<br/>")
SET Wx = New WxAPI
TokenArray = Wx.GetAccess_Token(Code)
Access_Token=TokenArray(0)
Openid=TokenArray(1)
'End If

02
2018
11

asp微信公众号获取用户地址信息源码,可以获取省市县及坐标

//获取定位
//$(".getLocation").on("click", function(){
wx.getLocation({
type: 'gcj02', // 默认为wgs84的gps坐标,如果要返回直接给openLocation用的火星坐标,可传入'gcj02'
success: function (res) {
var latitude = res.latitude; // 纬度,浮点数,范围为90 ~ -90
var longitude = res.longitude; // 经度,浮点数,范围为180 ~ -180。
$("#p_LatLng").html(longitude+','+latitude); //用户的坐标
var url='GetAddress.asp?lat='+latitude+'&lng='+longitude;
$.ajax({
type:"get",
cache:false,
url:url,
success:function(res)
{
$("#p_Address").html(res); //中文地址

}
});
},
cancel: function (res) {
alert('用户拒绝授权获取地理位置','');
}
});
//});

02
2018
11

微信公众号发送模板消息asp源码

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<% 
session.codepage=936
Response.Charset = "GB2312"
%>
<!--#include file="WxApi.asp"-->
<%
url = "http://www.xxx.com"
Dim Arr(4)
Arr(0) = "first=Hi,你好!"
Arr(1) = "keyword1=FromUserName"
Arr(2) = "keyword2="&Now
Arr(3) = "keyword3="&Url
Arr(4) = "remark=这里是备注信息"
color = "#000000"
Openid = "oGYGwuNbebj21KS3ydHKH5Mj5CRs"
template_id = "0x8MfyRiJSOYBPk4qLQ6m3AGdybjmOETitix18_IiBk" 
SET Wx = New WxAPI
call Wx.SendMessage(Openid,template_id,Url,Arr,color)
Set Wx=Nothing

02
2018
11

asp写的旅游线路拼团程序,旅游公司可用

<!--jdk分享-->
<script>
wx.ready(function () {