kxing 发表于 2011-4-24 21:29:50

[已解决]请教au3如何使用post方式提交

本帖最后由 kxing 于 2011-4-24 22:01 编辑

请教如何将guictrlcreateedit控件中的数据用post方式提交呢
也就是利用au3取代htm的form表单。。。
看过论坛上一些代码,不会用,麻烦高手指点。
多谢!!!!$hForm=guicreate("form",300,230)
$hEdit=guictrlcreateedit("",0,0,300,200)
$hBut=guictrlcreatebutton("submit",120,205,60,20)
guisetstate()

while 1
switch guigetmsg()
case -3
exitloop

case $hBut
;请教提交方法
endswitch
wend

kxing 发表于 2011-4-24 22:00:43

已经解决,代码如下:
$hForm=guicreate("form",300,230)
$hEdit=guictrlcreateedit("",0,0,300,200)
$hBut=guictrlcreatebutton("submit",120,205,60,20)
guisetstate()

while 1
switch guigetmsg()
case -3
exitloop

case $hBut
$text=guictrlread($hEdit)
$htm=_fairy_post("http://localhost/bbs/get.php",$text)
clipput($htm)
msgbox(0,'ok','ok')

endswitch
wend

func _fairy_post($url,$data)
$oHTTP = ObjCreate("microsoft.xmlhttp")
$oHTTP.Open("post",$url,false)
$oHTTP.setRequestHeader("Cache-Control", "no-cache")
$oHTTP.setRequestHeader("Accept-Language", "zh-cn")
$oHTTP.setRequestHeader("Content-Type","application/x-www-form-urlencoded")
$oHTTP.setRequestHeader("Referer",$url)
$oHTTP.Send("text="&$data)
$htm = $oHTTP.responseText
return $htm
endfunc
页: [1]
查看完整版本: [已解决]请教au3如何使用post方式提交