13518219792
弹出提示窗口，基本上随便哪个源码里面都有用到，比如用户后台登陆，你可以参考下
站在用户的角度思考问题，与客户深入沟通，找到祁连网站设计与祁连网站推广的解决方案，凭借多年的经验，让设计与互联网技术结合，创造个性化、用户体验好的作品，建站类型包括：成都网站制作、成都网站设计、企业官网、英文网站、手机端网站、网站推广、域名注册、虚拟空间、企业邮箱。业务覆盖祁连地区。
发送页面：
用get传值 如 点击button时 response.redirect（"接受页面的url"?canshu=textbox.text）
在接受页面：
用Request.QueryString["canshu"].toString（）； 这样就接受到textbox里的值了。
然后根据这个值到数据库里查询就行了。
把参数写到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
自动打开网页的BAT：
start
自动填写表单需要用VB或者VBA来写。
用自动键入数字和按钮的方法。
参看下面的贴子：
这个不容易做，本来打算用OLE的，但是发觉很难实现。我给你个思路：
1、用VB程序自动打开网页（调用那个BAT就可以了）；
2、自动按下数字键1；
3、自动按下ENTER键
图有点模糊。
服务器端要有方法接收，接收的参数要看方法的定义。
Controller A里面假设有这个get Action
httppost
function get(frm as formcollection) as actionresult
dim a as string=frm("keyword")
return content(a)
end function
页面View 中
@Using FormBegin("get","A","POST")
@div
input name="keyword" type="text"/
Input type="submit" value="提交"/
end using
你在页面上点击按钮“提交”后，就会把表单的中keyword文本框的内容赋值给a.
这里我用的是MVC..前端用的VB Razor.
使用webbrowser空间实现很简单
一。 首先在窗体头部定义 Dim WithEvents MyDom As MSHTML.HTMLDocument
其次找到element对象 myDom=WebBrowser1.Document.getElementsByName("sa")
最后执行onclick : mydom.onclick
二.还有想要实现点击，直接执行点击的相应函数即可例如：假设想实现点击下面的Inputbox
input id="busT1" name="busT" type="radio" value="1" class="input5" checked="checked" onclick="busSwitchDiv('changeDiv')" tabindex="18"/
那么直接执行onclick里的函数busSwitchDiv('changeDiv')即可，执行语句如下：
WebBrowser1.Document.parentwindow.execscript "busSwitchDiv('changeDiv')"
