把参数写到post 中
专注于为中小企业提供成都网站设计、做网站服务,电脑端+手机端+微信端的三站合一,更高效的管理,为中小企业西安免费做网站提供优质的服务。我们立足成都，凝聚了一批互联网行业人才，有力地推动了上千余家企业的稳健成长，帮助中小企业通过网站建设实现规模扩充和转变。
Dim xmlhttp
Set xmlhttp = CreateObject("msxml2.xmlhttp")
With xmlhttp
.open "POST", url, False
.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
.send "userid=apcisspassword=544112255page=5"'======写到这里
End With
Set xmlhttp = Nothing
简单的方法是把你要生成的数的变量设置模块级全局变量，也就是在模块中用public定义就可以了
接受页面： 用Request.QueryString["canshu"].toString（）； 这样就接受到textbox里的值了。 然后根据这个值到数据库里查询就行了。