|
|
|
Microsoft.XMLHTTP или MSXML2.XMLHTTP ???
|
|||
|---|---|---|---|
|
#18+
Комрады, как найти инфу какие функции/проперти и т.д. есть у этих . я вроде в браузере билдера на табе OLE смотрел, тока или плохо смотрел или там этого нет. Вообшем-то в перспективе нужно - сначала узнать какой из них у юзверя на машине зарегестрирован, пик его ну и какой никакой эрор хандлинг. я тут куски кода в сетке понаходил, и собрал: int i_rc oleobject oXMLHttp string s_request_post s_request_post = a_s_url + '/addCommunity' oXMLHttp = CREATE oleobject i_rc = oXMLHttp.ConnectToNewObject(/* for version 3.0 of XMLHTTP & */'MSXML2.XMLHTTP') //'Microsoft.XMLHTTP IF i_rc < 0 or IsNull(i_rc) THEN DESTROY oXMLHttp RETURN -1 END IF oXMLHttp.Open ('POST', s_request_post, FALSE) oXMLHttp.setRequestHeader('Content-Type', 'application/x-www-form-urlencoded') oXMLHttp.Send(ar_s_post_str) // Wait for up to 3 seconds if we've not gotten the data yet ... IF oXMLHttp.readyState <> 4 THEN oXMLHttp.waitForResponse = 3 END IF // Did an error occur? If so, use a default value for our data ... //IF oXMLHttp.ErrorNumber <> 0 THEN //ar_s_post_str = "some default text..." //ELSE IF oXMLHttp.readyState <> 4 Or oXMLHttp.Status <> 200 THEN // Abort the XMLHttp request ... oXMLHttp.Abort() ar_s_post_str = "Problem communicating with remote server..." ELSE ar_s_post_str = oXMLHttp.ResponseText END IF //END IF //ar_s_post_str = oXMLHttp.ResponseText oXMLHttp.DisconnectObject() DESTROY oXMLHttp RETURN 1 вроде работает, но хотелось бы знать больше. Спасибо. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.09.2006, 00:19 |
|
||
|
|

start [/forum/topic.php?fid=15&gotonew=1&tid=1337612]: |
0ms |
get settings: |
4ms |
get forum list: |
11ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
20ms |
get topic data: |
6ms |
get first new msg: |
3ms |
get forum data: |
1ms |
get page messages: |
19ms |
get tp. blocked users: |
1ms |
| others: | 192ms |
| total: | 261ms |

| 0 / 0 |
