以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  报错:编译错误,未定义类型 WxPayData,这是怎么回事?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=124524)

--  作者:xluoping
--  发布时间:2018/9/8 11:04:00
--  报错:编译错误,未定义类型 WxPayData,这是怎么回事?
代码如下,请帮助指导
Dim data As new WxPayData()
data.SetValue("appid", Vars("appid"))\'//公众帐号id
data.SetValue("mch_id", Vars("mchid"))\'//商户号
data.SetValue("time_stamp", data.GenerateTimeStamp)\'//时间戳
data.SetValue("nonce_str", data.GenerateNonceStr)\'//随机字符串
data.SetValue("product_id", args(0))\'//商品ID
data.SetValue("sign", data.MakeSign())\'//签名
Dim str = data.ToUrlParams()\'//转换为URL串
Dim url = "weixin://wxpay/bizpayurl?" + str

Functions.Execute("logtext","生成扫码支付的模式一URL : " + url)
Return url

--  作者:有点蓝
--  发布时间:2018/9/8 11:27:00
--  
看别人例子的全局代码