|
楼主 |
发表于 2011-12-22 12:59:50
|
显示全部楼层
本帖最后由 liangxm 于 2011-12-22 13:02 编辑
Func work($address_value, $account_value, $code_value)
$address_value = GUICtrlRead($address,1)
$account_value = GUICtrlRead($account)
$code_value = GUICtrlRead($code)
$account_start = GUICtrlRead($number_start)
$account_end = GUICtrlRead($number_end)
If $account_start = $account_end Then
$url = "http://"&$address_value&"/xxxx/access?soapaction=config_gm&game_id="&$account_value&"&game_level="&$code_value
$oIE = _IECreate($url,0,0,1,-1)
$sText = _IEBodyReadText($oIE)
$ie_note = GUICtrlCreateLabel($account_value&$number& @CRLF &$address_value & @CRLF &$code_value & @CRLF &$sText, 20, 270, 460, 120)
;;$ie_note = GUICtrlCreateLabel($account_value&$number& @CRLF &$address_value & @CRLF &$code_value & @CRLF, 20, 270, 460, 120)
_IEQuit ($oIE)
Else
$mun = 0
For $number = $account_end To $account_start Step -1
$mun = $mun + 1
$url = "http://"&$address_value&"/xxxx/access?soapaction=config_gm&game_id="&$account_value&$number&"&game_level="&$code_value
$oIE = _IECreate($url,0,0,1,-1)
$sText = _IEBodyReadText($oIE)
$ie_note = GUICtrlCreateLabel($account_value&$number& @CRLF &$address_value & @CRLF &$code_value & @CRLF &$sText, 20, 270, 460, 120)
;;$ie_note = GUICtrlCreateLabel($account_value&$number& @CRLF &$address_value & @CRLF &$code_value & @CRLF , 20, 270, 460, 120)
_IEQuit ($oIE)
Next
$ie_note_start = $ie_note - $mun + 1
For $idx = $ie_note_start To $ie_note - 1
GUICtrlSetState($idx, $GUI_HIDE)
Next
EndIf
EndFunc ;==>GUIChangeItems |
|