VBFunctionBas/HttpHelper.bas

Attribute VB_Name = "HttpHelper"
'#######################################<23>û<EFBFBD><C3BB>ؼ<EFBFBD>˵<EFBFBD><CBB5>#########################################

'<27><><EFBFBD><EFBFBD>:XmlHttp<74>ؼ<EFBFBD>

'<27><><EFBFBD><EFBFBD>:ʵ<><CAB5>XmlHttp<74><70><EFBFBD><EFBFBD><EFBFBD>紦<EFBFBD><E7B4A6><EFBFBD><EFBFBD><EFBFBD>ܡ<EFBFBD>

'<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>:2014<31><34>6<EFBFBD><36>4<EFBFBD><34>

'<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>:<3A><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>

'<27><>λ:<3A>Ϻ<EFBFBD><CFBA>ж<EFBFBD><D0B6><EFBFBD>ˮ<EFBFBD>繤<EFBFBD>̰<EFBFBD>װ<EFBFBD><D7B0><EFBFBD>޹<EFBFBD>˾

'#######################################<23>û<EFBFBD><C3BB>ؼ<EFBFBD>˵<EFBFBD><CBB5>#########################################
'****************************************************
'GET<45><54>ҳ<EFBFBD><D2B3>GetData (<28><>ַ As String, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> As DataEnum )
'****************************************************
'POST<53><54>ҳ<EFBFBD><D2B3>PostData (<28><>ַ As String, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> As DataEnum )
'****************************************************

'XmlHttp.Status <20><><EFBFBD><EFBFBD>ֵ
'Web<65><62><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ӧ<EFBFBD><D3A6><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ͻ<EFBFBD><CDBB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><CAB1><EFBFBD><EFBFBD>Ӧ<EFBFBD><D3A6>һ<EFBFBD><D2BB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD><C2BC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɣ<EFBFBD>һ<EFBFBD><D2BB>״̬<D7B4>У<EFBFBD><D0A3><EFBFBD><EFBFBD><EFBFBD>Ӧ<EFBFBD><D3A6>ͷ<EFBFBD><CDB7>һ<EFBFBD><D2BB><EFBFBD><EFBFBD><EFBFBD>У<EFBFBD><D0A3><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ĵ<EFBFBD><C4B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>һ<EFBFBD><D2BB><EFBFBD><EFBFBD><EFBFBD>򵥵<EFBFBD>Ӧ<EFBFBD><D3A6><EFBFBD><EFBFBD>
'
'<27><><EFBFBD><EFBFBD>״̬<D7B4>а<EFBFBD><D0B0><EFBFBD>HTTP<54>汾<EFBFBD><E6B1BE>״̬<D7B4><CCAC><EFBFBD>롢<EFBFBD><EBA1A2>״̬<D7B4><CCAC><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ӧ<EFBFBD>ļ<EFBFBD><C4BC><EFBFBD>˵<EFBFBD><CBB5><EFBFBD><EFBFBD>Ϣ<EFBFBD><CFA2><EFBFBD>ڴ<EFBFBD><DAB4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>£<EFBFBD><C2A3><EFBFBD><EFBFBD><EFBFBD>Content-Type֮<65><D6AE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ӧ<EFBFBD><D3A6>ͷ<EFBFBD><CDB7><EFBFBD>ǿ<EFBFBD>ѡ<EFBFBD>ġ<EFBFBD><C4A1><EFBFBD>Content-Type<70>DZ<EFBFBD><C7B1><EFBFBD><EFBFBD>ģ<EFBFBD><C4A3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ǻ<EFBFBD><C7BA><EFBFBD><EFBFBD>ĵ<EFBFBD><C4B5><EFBFBD>MIME<4D><45><EFBFBD>͡<EFBFBD><CDA1><EFBFBD>Ȼ<EFBFBD><C8BB><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ӧ<EFBFBD>𶼰<EFBFBD><F0B6BCB0><EFBFBD>һ<EFBFBD><D2BB><EFBFBD>ĵ<EFBFBD><C4B5><EFBFBD><EFBFBD><EFBFBD>Ҳ<EFBFBD><D2B2>һЩ<D2BB><D0A9><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>HEAD<41><44><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ӧ<EFBFBD><D3A6><EFBFBD><EFBFBD>Զ<EFBFBD><D4B6><EFBFBD>ḽ<EFBFBD><E1B8BD><EFBFBD>ĵ<EFBFBD><C4B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>״̬<D7B4><CCAC><EFBFBD><EFBFBD>ʵ<EFBFBD><CAB5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʶһ<CAB6><D2BB>ʧ<EFBFBD>ܵ<EFBFBD><DCB5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ЩӦ<D0A9><D3A6>Ҳ<EFBFBD><D2B2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ĵ<EFBFBD><C4B5><EFBFBD><EFBFBD><EFBFBD>ֻ<EFBFBD><D6BB><EFBFBD><EFBFBD>һ<EFBFBD><D2BB><EFBFBD><EFBFBD><EFBFBD>̵Ĵ<CCB5><C4B4><EFBFBD><EFBFBD><EFBFBD>Ϣ˵<CFA2><CBB5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
'
'<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD><C3BB><EFBFBD>ͼͨ<CDBC><CDA8> HTTP <20><><EFBFBD><EFBFBD>һ̨<D2BB><CCA8><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Internet <20><>Ϣ<EFBFBD><CFA2><EFBFBD><EFBFBD> (IIS) <20>ķ<EFBFBD><C4B7><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ϵ<EFBFBD><CFB5><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><CAB1>IIS <20><><EFBFBD><EFBFBD>һ<EFBFBD><D2BB><EFBFBD><EFBFBD>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>״̬<D7B4><CCAC><EFBFBD><EFBFBD><EFBFBD>ִ<EFBFBD><D6B4>롣״̬<D7B4><CCAC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ָ<EFBFBD><D6B8><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƿ<EFBFBD><C7B7>ѳɹ<D1B3><C9B9><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Խ<EFBFBD>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD>ʧ<EFBFBD>ܵ<EFBFBD>ȷ<EFBFBD><C8B7>ԭ<EFBFBD><D4AD><EFBFBD><EFBFBD>
'
'1 xx -<2D><>Ϣ<EFBFBD><CFA2>ʾ
'
'<27><>Щ״̬<D7B4><CCAC><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʾ<EFBFBD><CABE>ʱ<EFBFBD><CAB1><EFBFBD><EFBFBD>Ӧ<EFBFBD><D3A6><EFBFBD>ͻ<EFBFBD><CDBB><EFBFBD><EFBFBD><EFBFBD><EFBFBD>յ<EFBFBD><D5B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ӧ֮ǰ<D6AE><C7B0>Ӧ׼<D3A6><D7BC><EFBFBD><EFBFBD><EFBFBD><EFBFBD>һ<EFBFBD><D2BB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 1xx <20><>Ӧ<EFBFBD><D3A6>
'<27><><EFBFBD><EFBFBD> 100 - Continue <20><>ʼ<EFBFBD><CABC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ѿ<EFBFBD><D1BE><EFBFBD><EFBFBD>ܣ<EFBFBD><DCA3>ͻ<EFBFBD>Ӧ<EFBFBD><D3A6><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ಿ<EFBFBD>֡<EFBFBD><D6A1><EFBFBD>HTTP 1.1<EFBFBD>£<EFBFBD>
'<27><><EFBFBD><EFBFBD> 101 - Switching Protocols <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ӿͻ<D3BF><CDBB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ת<EFBFBD><D7AA><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>һ<EFBFBD><D2BB>Э<EFBFBD>飨HTTP 1.1<EFBFBD>£<EFBFBD>
'
'2 xx -<2D>ɹ<EFBFBD>
'
'<27><><EFBFBD><EFBFBD>״̬<D7B4><CCAC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɹ<EFBFBD><C9B9>ؽ<EFBFBD><D8BD><EFBFBD><EFBFBD>˿ͻ<CBBF><CDBB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>?
'<27><><EFBFBD><EFBFBD> 200 - OK һ<><D2BB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>GET<45><54>POST<53><54><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ӧ<EFBFBD><D3A6><EFBFBD>ĵ<EFBFBD><C4B5><EFBFBD><EFBFBD>ں<EFBFBD><DABA>档
'<27><><EFBFBD><EFBFBD> 201 - Created <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ѿ<EFBFBD><D1BE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ĵ<EFBFBD><C4B5><EFBFBD>Locationͷ<6E><CDB7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>URL<52><4C>
'<27><><EFBFBD><EFBFBD> 202 - Accepted <20>Ѿ<EFBFBD><D1BE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>󣬵<EFBFBD><F3A3ACB5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>δ<EFBFBD><CEB4><EFBFBD>ɡ<EFBFBD>
'<27><><EFBFBD><EFBFBD> 203 - Non-Authoritative Information <20>ĵ<EFBFBD><C4B5>Ѿ<EFBFBD><D1BE><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ط<EFBFBD><D8B7>أ<EFBFBD><D8A3><EFBFBD>һЩӦ<D0A9><D3A6>ͷ<EFBFBD><CDB7><EFBFBD>ܲ<EFBFBD><DCB2><EFBFBD>ȷ<EFBFBD><C8B7><EFBFBD><EFBFBD>Ϊʹ<CEAA>õ<EFBFBD><C3B5><EFBFBD><EFBFBD>ĵ<EFBFBD><C4B5>Ŀ<EFBFBD><C4BF><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȩ<EFBFBD><C8A8><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ϣ<EFBFBD><CFA2>HTTP 1.1<EFBFBD>£<EFBFBD><EFBFBD><EFBFBD>
'<27><><EFBFBD><EFBFBD> 204 - No Content û<><C3BB><EFBFBD><EFBFBD><EFBFBD>ĵ<EFBFBD><C4B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ӧ<EFBFBD>ü<EFBFBD><C3BC><EFBFBD><EFBFBD><EFBFBD>ʾԭ<CABE><D4AD><EFBFBD><EFBFBD><EFBFBD>ĵ<EFBFBD><C4B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD><C3BB><EFBFBD><EFBFBD>ڵ<EFBFBD>ˢ<EFBFBD><CBA2>ҳ<EFBFBD>棬<EFBFBD><E6A3AC>Servlet<65><74><EFBFBD><EFBFBD>ȷ<EFBFBD><C8B7><EFBFBD>û<EFBFBD><C3BB>ĵ<EFBFBD><C4B5>㹻<EFBFBD>£<EFBFBD><C2A3><EFBFBD><EFBFBD><EFBFBD>״̬<D7B4><CCAC><EFBFBD><EFBFBD><EFBFBD>Ǻ<EFBFBD><C7BA><EFBFBD><EFBFBD>õġ<C3B5>
'<27><><EFBFBD><EFBFBD> 205 - Reset Content û<><C3BB><EFBFBD>µ<EFBFBD><C2B5><EFBFBD><EFBFBD>ݣ<EFBFBD><DDA3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ӧ<EFBFBD><D3A6><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD><EFBFBD>ݡ<EFBFBD><DDA1><EFBFBD><EFBFBD><EFBFBD>ǿ<EFBFBD><C7BF><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ݣ<EFBFBD>HTTP 1.1<EFBFBD>£<EFBFBD><EFBFBD><EFBFBD>
'<27><><EFBFBD><EFBFBD> 206 - Partial Content <20>ͻ<EFBFBD><CDBB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>һ<EFBFBD><D2BB><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Rangeͷ<65><CDB7>GET<45><54><EFBFBD>󣬷<EFBFBD><F3A3ACB7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>HTTP 1.1<EFBFBD>£<EFBFBD><EFBFBD><EFBFBD>
'
'3 xx -<2D>ض<EFBFBD><D8B6><EFBFBD>
'
'<27>ͻ<EFBFBD><CDBB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ȡ<EFBFBD><C8A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʵ<EFBFBD><CAB5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>磬<EFBFBD><E7A3AC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ܲ<EFBFBD><DCB2>ò<EFBFBD><C3B2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ϵIJ<CFB5>ͬ<EFBFBD><CDAC>ҳ<EFBFBD>棬<EFBFBD><E6A3AC>ͨ<EFBFBD><CDA8><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ظ<EFBFBD><D8B8><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
'<27><><EFBFBD><EFBFBD> 300 - Multiple Choices <20>ͻ<EFBFBD><CDBB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ĵ<EFBFBD><C4B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ڶ<EFBFBD><DAB6><EFBFBD>λ<EFBFBD><CEBB><EFBFBD>ҵ<EFBFBD><D2B5><EFBFBD><EFBFBD><EFBFBD>Щλ<D0A9><CEBB><EFBFBD>Ѿ<EFBFBD><D1BE>ڷ<EFBFBD><DAB7>ص<EFBFBD><D8B5>ĵ<EFBFBD><C4B5><EFBFBD><EFBFBD>г<EFBFBD><D0B3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ҫ<EFBFBD><D2AA><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ѡ<EFBFBD><D1A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ӧ<EFBFBD><D3A6><EFBFBD><EFBFBD>LocationӦ<6E><D3A6>ͷָ<CDB7><D6B8><EFBFBD><EFBFBD>
'<27><><EFBFBD><EFBFBD> 301 - Moved Permanently <20>ͻ<EFBFBD><CDBB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ĵ<EFBFBD><C4B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ط<EFBFBD><D8B7><EFBFBD><EFBFBD>µ<EFBFBD>URL<52><4C>Locationͷ<6E>и<EFBFBD><D0B8><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ӧ<EFBFBD><D3A6><EFBFBD>Զ<EFBFBD><D4B6>ط<EFBFBD><D8B7><EFBFBD><EFBFBD>µ<EFBFBD>URL<52><4C>
'<27><><EFBFBD><EFBFBD> 302 - Found <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>301<30><31><EFBFBD><EFBFBD><EFBFBD>µ<EFBFBD>URLӦ<4C>ñ<EFBFBD><C3B1><EFBFBD>Ϊ<EFBFBD><CEAA>ʱ<EFBFBD>Ե<EFBFBD><D4B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Եġ<D4B5>ע<EFBFBD>⣬<EFBFBD><E2A3AC>HTTP1.0<EFBFBD>ж<EFBFBD>Ӧ<EFBFBD><EFBFBD>״̬<EFBFBD><EFBFBD>Ϣ<EFBFBD>ǡ<EFBFBD>Moved Temporatily<6C><79><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ָ<EFBFBD>״̬<D7B4><CCAC><EFBFBD><EFBFBD>ʱ<EFBFBD><CAB1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ܹ<EFBFBD><DCB9>Զ<EFBFBD><D4B6><EFBFBD><EFBFBD><EFBFBD><EFBFBD>µ<EFBFBD>URL<52><4C><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>һ<EFBFBD><D2BB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>õ<EFBFBD>״̬<D7B4><CCAC><EFBFBD>롣ע<EBA1A3><D7A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD>״̬<D7B4><CCAC><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><CAB1><EFBFBD><EFBFBD><EFBFBD>Ժ<EFBFBD>301<30>滻ʹ<E6BBBB>á<EFBFBD><C3A1><EFBFBD><EFBFBD>磬<EFBFBD><E7A3AC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> http://host/~user <20><>ȱ<EFBFBD><C8B1><EFBFBD>˺<EFBFBD><CBBA><EFBFBD><EFBFBD><EFBFBD>б<EFBFBD>ܣ<EFBFBD><DCA3><EFBFBD><EFBFBD>еķ<D0B5><C4B7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>301<30><31><EFBFBD>е<EFBFBD><D0B5>򷵻<EFBFBD>302<30><32><EFBFBD>ϸ<EFBFBD><CFB8><EFBFBD>˵<EFBFBD><CBB5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ֻ<EFBFBD>ܼٶ<DCBC>ֻ<EFBFBD>е<EFBFBD>ԭ<EFBFBD><D4AD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>GETʱ<54><CAB1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ż<EFBFBD><C5BB>Զ<EFBFBD><D4B6>ض<EFBFBD><D8B6><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>μ<EFBFBD>307<30><37>
'<27><><EFBFBD><EFBFBD> 303 - See Other <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>301/302<30><32><EFBFBD><EFBFBD>֮ͬ<CDAC><D6AE><EFBFBD><EFBFBD><EFBFBD>ڣ<EFBFBD><DAA3><EFBFBD><EFBFBD><EFBFBD>ԭ<EFBFBD><D4AD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>POST<53><54>Locationͷָ<CDB7><D6B8><EFBFBD><EFBFBD><EFBFBD>ض<EFBFBD><D8B6><EFBFBD>Ŀ<EFBFBD><C4BF><EFBFBD>ĵ<EFBFBD>Ӧ<EFBFBD><D3A6>ͨ<EFBFBD><CDA8>GET<45><54>ȡ<EFBFBD><C8A1>HTTP 1.1<EFBFBD>£<EFBFBD><EFBFBD><EFBFBD>
'<27><><EFBFBD><EFBFBD> 304 - Not Modified <20>ͻ<EFBFBD><CDBB><EFBFBD><EFBFBD>л<EFBFBD><D0BB><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ĵ<EFBFBD><C4B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>һ<EFBFBD><D2BB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ե<EFBFBD><D4B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>һ<EFBFBD><D2BB><EFBFBD><EFBFBD><EFBFBD>ṩIf-Modified-Sinceͷ<65><CDB7>ʾ<EFBFBD>ͻ<EFBFBD>ֻ<EFBFBD><D6BB><EFBFBD><EFBFBD>ָ<EFBFBD><D6B8><EFBFBD><EFBFBD><EFBFBD>ڸ<EFBFBD><DAB8>µ<EFBFBD><C2B5>ĵ<EFBFBD><C4B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>߿ͻ<DFBF><CDBB><EFBFBD>ԭ<EFBFBD><D4AD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ĵ<EFBFBD><C4B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Լ<EFBFBD><D4BC><EFBFBD>ʹ<EFBFBD>á<EFBFBD>
'<27><><EFBFBD><EFBFBD> 305 - Use Proxy <20>ͻ<EFBFBD><CDBB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ĵ<EFBFBD>Ӧ<EFBFBD><D3A6>ͨ<EFBFBD><CDA8>Locationͷ<6E><CDB7>ָ<EFBFBD><D6B8><EFBFBD>Ĵ<EFBFBD><C4B4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ȡ<EFBFBD><C8A1>HTTP 1.1<EFBFBD>£<EFBFBD><EFBFBD><EFBFBD>
'<27><><EFBFBD><EFBFBD> 307 - Temporary Redirect <20><>302<30><32>Found<6E><64><EFBFBD><EFBFBD>ͬ<EFBFBD><CDAC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ӧ302Ӧ<32><D3A6><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ض<EFBFBD><D8B6>򣬼<EFBFBD>ʹԭ<CAB9><D4AD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>POST<53><54><EFBFBD><EFBFBD>ʹ<EFBFBD><CAB9>ʵ<EFBFBD><CAB5><EFBFBD><EFBFBD>ֻ<EFBFBD><D6BB><EFBFBD><EFBFBD>POST<53><54><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ӧ<EFBFBD><D3A6><EFBFBD><EFBFBD>303ʱ<33><CAB1><EFBFBD><EFBFBD><EFBFBD>ض<EFBFBD><D8B6><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ԭ<EFBFBD><D4AD><EFBFBD><EFBFBD>HTTP 1.1<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>307<EFBFBD><EFBFBD><EFBFBD>Ա<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ּ<EFBFBD><EFBFBD><EFBFBD>״̬<EFBFBD><EFBFBD><EFBFBD>룺<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>303Ӧ<EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ը<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ض<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>GET<EFBFBD><EFBFBD>POST<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>307Ӧ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ֻ<EFBFBD>ܸ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>GET<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ض<EFBFBD><EFBFBD>򡣣<EFBFBD>HTTP 1.1<EFBFBD>£<EFBFBD>
'
'4 xx -<2D>ͻ<EFBFBD><CDBB>˴<EFBFBD><CBB4><EFBFBD>
'
'<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>󣬿ͻ<F3A3ACBF><CDBB><EFBFBD><EFBFBD>ƺ<EFBFBD><C6BA><EFBFBD><EFBFBD><EFBFBD><EFBFBD>⡣<EFBFBD><E2A1A3><EFBFBD>磬<EFBFBD>ͻ<EFBFBD><CDBB><EFBFBD><EFBFBD><EFBFBD><EFBFBD>󲻴<EFBFBD><F3B2BBB4>ڵ<EFBFBD>ҳ<EFBFBD>棬<EFBFBD>ͻ<EFBFBD><CDBB><EFBFBD>δ<EFBFBD>ṩ<EFBFBD><E1B9A9>Ч<EFBFBD><D0A7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>֤<EFBFBD><D6A4>Ϣ<EFBFBD><CFA2>
'
'<27><><EFBFBD><EFBFBD> 400 - Bad Request <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>﷨<EFBFBD><EFB7A8><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
'<27><><EFBFBD><EFBFBD> 401 - Unauthorized <20><><EFBFBD>ʱ<EFBFBD><CAB1>ܾ<EFBFBD><DCBE><EFBFBD><EFBFBD>ͻ<EFBFBD><CDBB><EFBFBD>ͼδ<CDBC><CEB4><EFBFBD><EFBFBD>Ȩ<EFBFBD><C8A8><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>뱣<EFBFBD><EBB1A3><EFBFBD><EFBFBD>ҳ<EFBFBD>档Ӧ<E6A1A3><D3A6><EFBFBD>л<EFBFBD><D0BB><EFBFBD><EFBFBD><EFBFBD>һ<EFBFBD><D2BB>WWW-Authenticateͷ<65><CDB7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ݴ<EFBFBD><DDB4><EFBFBD>ʾ<EFBFBD>û<EFBFBD><C3BB><EFBFBD><EFBFBD><EFBFBD>/<2F><><EFBFBD><EFBFBD><EFBFBD>Ի<EFBFBD><D4BB><EFBFBD><EFBFBD><EFBFBD>Ȼ<EFBFBD><C8BB><EFBFBD><EFBFBD><EFBFBD><EFBFBD>д<EFBFBD><D0B4><EFBFBD>ʵ<EFBFBD>Authorizationͷ<6E><CDB7><EFBFBD>ٴη<D9B4><CEB7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>IIS <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>಻ͬ<E0B2BB><CDAC> 401 <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ָ<EFBFBD><D6B8><EFBFBD><EFBFBD>Ϊ<EFBFBD><CEAA><EFBFBD><EFBFBD><EFBFBD>Ĵ<EFBFBD><C4B4><EFBFBD>ԭ<EFBFBD><D4AD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Щ<EFBFBD><D0A9><EFBFBD><EFBFBD><EFBFBD>Ĵ<EFBFBD><C4B4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> IIS <20><>־<EFBFBD><D6BE><EFBFBD><EFBFBD>ʾ<EFBFBD><CABE>
'  <20><> 401.1 - <20><>¼ʧ<C2BC><CAA7>?
'  <20><> 401.2 - <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>õ<EFBFBD><C3B5>µ<EFBFBD>¼ʧ<C2BC><CAA7>?
'<27><><EFBFBD><EFBFBD> 401.3 - <20><><EFBFBD><EFBFBD> ACL <20><><EFBFBD><EFBFBD>Դ<EFBFBD><D4B4><EFBFBD><EFBFBD><EFBFBD>ƶ<EFBFBD>δ<EFBFBD><CEB4><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȩ<EFBFBD><C8A8>
'  <20><> 401.4 - ɸѡ<C9B8><D1A1><EFBFBD><EFBFBD>Ȩʧ<C8A8><CAA7>?
'<27><><EFBFBD><EFBFBD> 401.5 - ISAPI/CGI Ӧ<>ó<EFBFBD><C3B3><EFBFBD><EFBFBD><EFBFBD>Ȩʧ<C8A8>ܡ<EFBFBD>
'<27><><EFBFBD><EFBFBD> 401.7 <20>C <20><><EFBFBD>ʱ<EFBFBD> Web <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ϵ<EFBFBD> URL <20><>Ȩ<EFBFBD><C8A8><EFBFBD>Ծܾ<D4BE><DCBE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ϊ IIS 6.0 <20><>ר<EFBFBD>á<EFBFBD>
'<27><><EFBFBD><EFBFBD> 403 - Forbidden <20><>Դ<EFBFBD><D4B4><EFBFBD><EFBFBD><EFBFBD>á<EFBFBD><C3A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ͻ<EFBFBD><CDBB><EFBFBD><EFBFBD><EFBFBD><EFBFBD>󣬵<EFBFBD><F3A3ACB5>ܾ<EFBFBD><DCBE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ͨ<EFBFBD><CDA8><EFBFBD><EFBFBD><EFBFBD>ڷ<EFBFBD><DAB7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ļ<EFBFBD><C4BC><EFBFBD>Ŀ¼<C4BF><C2BC>Ȩ<EFBFBD><C8A8><EFBFBD><EFBFBD><EFBFBD>õ<EFBFBD><C3B5>¡<EFBFBD><C2A1><EFBFBD>ֹ<EFBFBD><D6B9><EFBFBD>ʣ<EFBFBD>IIS <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>಻ͬ<E0B2BB><CDAC> 403 <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ָ<EFBFBD><D6B8><EFBFBD><EFBFBD>Ϊ<EFBFBD><CEAA><EFBFBD><EFBFBD><EFBFBD>Ĵ<EFBFBD><C4B4><EFBFBD>ԭ<EFBFBD><D4AD><EFBFBD><EFBFBD>
'  <20><> 403.1 - ִ<>з<EFBFBD><D0B7>ʱ<EFBFBD><CAB1><EFBFBD>ֹ?
'  <20><> 403.2 - <20><><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><CAB1><EFBFBD>ֹ?
'  <20><> 403.3 - д<><D0B4><EFBFBD>ʱ<EFBFBD><CAB1><EFBFBD>ֹ?
'<27><><EFBFBD><EFBFBD> 403.4 - Ҫ<><D2AA> SSL<53><4C>
'<27><><EFBFBD><EFBFBD> 403.5 - Ҫ<><D2AA> SSL 128<32><38>
'<27><><EFBFBD><EFBFBD> 403.6 - IP <20><>ַ<EFBFBD><D6B7><EFBFBD>ܾ<EFBFBD><DCBE><EFBFBD>
'  <20><> 403.7 - Ҫ<><D2AA><EFBFBD>ͻ<EFBFBD><CDBB><EFBFBD>֤<EFBFBD><D6A4>?
'  <20><> 403.8 - վ<><D5BE><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><CAB1>ܾ<EFBFBD>?
'  <20><> 403.9 - <20>û<EFBFBD><C3BB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>?
'  <20><> 403.1 - <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ч?
'  <20><> 403.11 - <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>?
'  <20><> 403.12 - <20>ܾ<EFBFBD><DCBE><EFBFBD><EFBFBD><EFBFBD>ӳ<EFBFBD><D3B3><EFBFBD><EFBFBD>?
'  <20><> 403.13 - <20>ͻ<EFBFBD><CDBB><EFBFBD>֤<EFBFBD>鱻<EFBFBD><E9B1BB><EFBFBD><EFBFBD>?
'  <20><> 403.14 - <20>ܾ<EFBFBD>Ŀ¼<C4BF>б<EFBFBD>?
'  <20><> 403.15 - <20><><EFBFBD><EFBFBD><EFBFBD>ͻ<EFBFBD><CDBB>˷<EFBFBD><CBB7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>?
'  <20><> 403.16 - <20>ͻ<EFBFBD><CDBB><EFBFBD>֤<EFBFBD>鲻<EFBFBD><E9B2BB><EFBFBD><EFBFBD><EFBFBD>λ<EFBFBD><CEBB><EFBFBD>Ч?
'  <20><> 403.17 - <20>ͻ<EFBFBD><CDBB><EFBFBD>֤<EFBFBD><D6A4><EFBFBD>ѹ<EFBFBD><D1B9>ڻ<EFBFBD><DABB><EFBFBD>δ<EFBFBD><CEB4>Ч?
'<27><><EFBFBD><EFBFBD> 403.18 - <20>ڵ<EFBFBD>ǰ<EFBFBD><C7B0>Ӧ<EFBFBD>ó<EFBFBD><C3B3><EFBFBD><EFBFBD><EFBFBD><EFBFBD>в<EFBFBD><D0B2><EFBFBD>ִ<EFBFBD><D6B4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> URL<52><4C><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ϊ IIS 6.0 <20><>ר<EFBFBD>á<EFBFBD>
'<27><><EFBFBD><EFBFBD> 403.19 - <20><><EFBFBD><EFBFBD>Ϊ<EFBFBD><CEAA><EFBFBD><EFBFBD>Ӧ<EFBFBD>ó<EFBFBD><C3B3><EFBFBD><EFBFBD><EFBFBD><EFBFBD>еĿͻ<C4BF><CDBB><EFBFBD>ִ<EFBFBD><D6B4> CGI<47><49><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ϊ IIS 6.0 <20><>ר<EFBFBD>á<EFBFBD>
'<27><><EFBFBD><EFBFBD> 403.20 - Passport <20><>¼ʧ<C2BC>ܡ<EFBFBD><DCA1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ϊ IIS 6.0 <20><>ר<EFBFBD>á<EFBFBD>
'<27><><EFBFBD><EFBFBD> 404 - Not Found <20>޷<EFBFBD><DEB7>ҵ<EFBFBD>ָ<EFBFBD><D6B8>λ<EFBFBD>õ<EFBFBD><C3B5><EFBFBD>Դ<EFBFBD><D4B4><EFBFBD><EFBFBD>Ҳ<EFBFBD><D2B2>һ<EFBFBD><D2BB><EFBFBD><EFBFBD><EFBFBD>õ<EFBFBD>Ӧ<EFBFBD><D3A6><EFBFBD><EFBFBD>
'<27><><EFBFBD><EFBFBD> 404.0 -<2D><><EFBFBD>ޣ<EFBFBD> <20>C û<><C3BB><EFBFBD>ҵ<EFBFBD><D2B5>ļ<EFBFBD><C4BC><EFBFBD>Ŀ¼<C4BF><C2BC>
'<27><><EFBFBD><EFBFBD> 404.1 - <20>޷<EFBFBD><DEB7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ķ˿<C4B6><CBBF>Ϸ<EFBFBD><CFB7><EFBFBD> Web վ<>㡣
'<27><><EFBFBD><EFBFBD> 404.2 - Web <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>չ<EFBFBD><D5B9><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ֹ<EFBFBD><D6B9><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
'<27><><EFBFBD><EFBFBD> 404.3 - MIME ӳ<><D3B3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ֹ<EFBFBD><D6B9><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
'
'<27><><EFBFBD><EFBFBD> 405 - Method Not Allowed <20><><EFBFBD>󷽷<EFBFBD><F3B7BDB7><EFBFBD>GET<45><54>POST<53><54>HEAD<41><44>DELETE<54><45>PUT<55><54>TRACE<43>ȣ<EFBFBD><C8A3><EFBFBD>ָ<EFBFBD><D6B8><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Դ<EFBFBD><D4B4><EFBFBD><EFBFBD><EFBFBD>ã<EFBFBD><C3A3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD>ҳ<EFBFBD><D2B3><EFBFBD><EFBFBD> HTTP ν<>ʲ<EFBFBD><CAB2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>HTTP 1.1<EFBFBD>£<EFBFBD>
'<27><><EFBFBD><EFBFBD> 406 - Not Acceptable ָ<><D6B8><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Դ<EFBFBD>Ѿ<EFBFBD><D1BE>ҵ<EFBFBD><D2B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>MIME<4D><45><EFBFBD>ͺͿͻ<CDBF><CDBB><EFBFBD>Accpetͷ<74><CDB7><EFBFBD><EFBFBD>ָ<EFBFBD><D6B8><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD><EFBFBD>ݣ<EFBFBD><DDA3>ͻ<EFBFBD><CDBB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ҳ<EFBFBD><D2B3><EFBFBD><EFBFBD> MIME <20><><EFBFBD>ͣ<EFBFBD>HTTP 1.1<EFBFBD>£<EFBFBD><EFBFBD><EFBFBD>
'<27><><EFBFBD><EFBFBD> 407 - Proxy Authentication Required Ҫ<><D2AA><EFBFBD><EFBFBD><EFBFBD>д<EFBFBD><D0B4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>֤<EFBFBD><D6A4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>401<30><31><EFBFBD><EFBFBD>ʾ<EFBFBD>ͻ<EFBFBD><CDBB><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ⱦ<EFBFBD><C8BE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȩ<EFBFBD><C8A8><EFBFBD><EFBFBD>HTTP 1.1<EFBFBD>£<EFBFBD>
'<27><><EFBFBD><EFBFBD> 408 - Request Timeout <20>ڷ<EFBFBD><DAB7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɵĵȴ<C4B5>ʱ<EFBFBD><CAB1><EFBFBD>ڣ<EFBFBD><DAA3>ͻ<EFBFBD>һֱû<D6B1>з<EFBFBD><D0B7><EFBFBD><EFBFBD>κ<EFBFBD><CEBA><EFBFBD><EFBFBD>󡣿ͻ<F3A1A3BF><CDBB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ժ<EFBFBD><D4BA>ظ<EFBFBD>ͬһ<CDAC><D2BB><EFBFBD>󡣣<EFBFBD>HTTP 1.1<EFBFBD>£<EFBFBD>
'<27><><EFBFBD><EFBFBD> 409 - Conflict ͨ<><CDA8><EFBFBD><EFBFBD>PUT<55><54><EFBFBD><EFBFBD><EFBFBD>йء<D0B9><D8A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Դ<EFBFBD>ĵ<EFBFBD>ǰ״̬<D7B4><CCAC><EFBFBD><EFBFBD>ͻ<EFBFBD><CDBB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ܳɹ<DCB3><C9B9><EFBFBD><EFBFBD><EFBFBD>HTTP 1.1<EFBFBD>£<EFBFBD>
'<27><><EFBFBD><EFBFBD> 410 - Gone <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ĵ<EFBFBD><C4B5>Ѿ<EFBFBD><D1BE><EFBFBD><EFBFBD>ٿ<EFBFBD><D9BF>ã<EFBFBD><C3A3><EFBFBD><EFBFBD>ҷ<EFBFBD><D2B7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>֪<EFBFBD><D6AA>Ӧ<EFBFBD><D3A6><EFBFBD>ض<EFBFBD><D8B6><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>һ<EFBFBD><D2BB><EFBFBD><EFBFBD>ַ<EFBFBD><D6B7><EFBFBD><EFBFBD><EFBFBD><EFBFBD>404<30>IJ<EFBFBD>ͬ<EFBFBD><CDAC><EFBFBD>ڣ<EFBFBD><DAA3><EFBFBD><EFBFBD><EFBFBD>407<30><37>ʾ<EFBFBD>ĵ<EFBFBD><C4B5><EFBFBD><EFBFBD>õ<EFBFBD><C3B5>뿪<EFBFBD><EBBFAA>ָ<EFBFBD><D6B8><EFBFBD><EFBFBD>λ<EFBFBD>ã<EFBFBD><C3A3><EFBFBD>404<30><34>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD>δ֪<CEB4><D6AA>ԭ<EFBFBD><D4AD><EFBFBD>ĵ<EFBFBD><C4B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>á<EFBFBD><C3A1><EFBFBD>HTTP 1.1<EFBFBD>£<EFBFBD>
'<27><><EFBFBD><EFBFBD> 411 - Length Required <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ܴ<EFBFBD><DCB4><EFBFBD><EFBFBD><EFBFBD><EFBFBD>󣬳<EFBFBD><F3A3ACB3>ǿͻ<C7BF><CDBB><EFBFBD><EFBFBD><EFBFBD>һ<EFBFBD><D2BB>Content-Lengthͷ<68><CDB7><EFBFBD><EFBFBD>HTTP 1.1<EFBFBD>£<EFBFBD>
'<27><><EFBFBD><EFBFBD> 412 - Precondition Failed <20><><EFBFBD><EFBFBD>ͷ<EFBFBD><CDB7>ָ<EFBFBD><D6B8><EFBFBD><EFBFBD>һЩǰ<D0A9><C7B0><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʧ<EFBFBD>ܣ<EFBFBD>HTTP 1.1<EFBFBD>£<EFBFBD><EFBFBD><EFBFBD>
'<27><><EFBFBD><EFBFBD> 413 <20>C Request Entity Too Large Ŀ<><C4BF><EFBFBD>ĵ<EFBFBD><C4B5>Ĵ<EFBFBD>С<EFBFBD><D0A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ǰԸ<C7B0>⴦<EFBFBD><E2B4A6><EFBFBD>Ĵ<EFBFBD>С<EFBFBD><D0A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ϊ<EFBFBD>Լ<EFBFBD><D4BC>ܹ<EFBFBD><DCB9>Ժ<EFBFBD><D4BA>ٴ<EFBFBD><D9B4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ӧ<EFBFBD><D3A6><EFBFBD>ṩһ<E1B9A9><D2BB>Retry-Afterͷ<72><CDB7>HTTP 1.1<EFBFBD>£<EFBFBD><EFBFBD><EFBFBD>
'<27><><EFBFBD><EFBFBD> 414 - Request URI Too Long URI̫<49><CCAB><EFBFBD><EFBFBD>HTTP 1.1<EFBFBD>£<EFBFBD><EFBFBD><EFBFBD>
'<27><><EFBFBD><EFBFBD> 415 <20>C <20><>֧<EFBFBD>ֵ<EFBFBD>ý<EFBFBD><C3BD><EFBFBD><EFBFBD><EFBFBD>͡<EFBFBD>
'<27><><EFBFBD><EFBFBD> 416 <20>C Requested Range Not Satisfiable <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ͻ<EFBFBD><CDBB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ָ<EFBFBD><D6B8><EFBFBD><EFBFBD>Rangeͷ<65><CDB7><EFBFBD><EFBFBD>HTTP 1.1<EFBFBD>£<EFBFBD>
'<27><><EFBFBD><EFBFBD> 417 <20>C ִ<><D6B4>ʧ<EFBFBD>ܡ<EFBFBD>
'<27><><EFBFBD><EFBFBD> 423 <20>C <20><><EFBFBD><EFBFBD><EFBFBD>Ĵ<EFBFBD><C4B4><EFBFBD><EFBFBD><EFBFBD>
'
'5 xx -<2D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
'
'<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɸ<EFBFBD><C9B8><EFBFBD><EFBFBD><EFBFBD>?
'
'<27><><EFBFBD><EFBFBD> 500 - Internal Server Error <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ϲ<EFBFBD><CFB2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɿͻ<C9BF><CDBB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
'<27><><EFBFBD><EFBFBD> 500.12 - Ӧ<>ó<EFBFBD><C3B3><EFBFBD><EFBFBD><EFBFBD>æ<EFBFBD><C3A6><EFBFBD><EFBFBD> Web <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
'<27><><EFBFBD><EFBFBD> 500.13 - Web <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̫æ<CCAB><C3A6>
'<27><><EFBFBD><EFBFBD> 500.15 - <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ֱ<EFBFBD><D6B1><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Global.asa<73><61>
'<27><><EFBFBD><EFBFBD> 500.16 <20>C UNC <20><>Ȩƾ<C8A8>ݲ<EFBFBD><DDB2><EFBFBD>ȷ<EFBFBD><C8B7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ϊ IIS 6.0 <20><>ר<EFBFBD>á<EFBFBD>
'<27><><EFBFBD><EFBFBD> 500.18 <20>C URL <20><>Ȩ<EFBFBD>洢<EFBFBD><E6B4A2><EFBFBD>ܴ򿪡<DCB4><F2BFAAA1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ϊ IIS 6.0 <20><>ר<EFBFBD>á<EFBFBD>
'<27><><EFBFBD><EFBFBD> 500.100 - <20>ڲ<EFBFBD> ASP <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
'<27><><EFBFBD><EFBFBD> 501 - Not Implemented <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>֧<EFBFBD><D6A7>ʵ<EFBFBD><CAB5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ҫ<EFBFBD>Ĺ<EFBFBD><C4B9>ܣ<EFBFBD>ҳüֵָ<D6B5><D6B8><EFBFBD><EFBFBD>δʵ<CEB4>ֵ<EFBFBD><D6B5><EFBFBD><EFBFBD>á<EFBFBD><C3A1><EFBFBD><EFBFBD>磬<EFBFBD>ͻ<EFBFBD><CDBB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>һ<EFBFBD><D2BB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>֧<EFBFBD>ֵ<EFBFBD>PUT<55><54><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
'<27><><EFBFBD><EFBFBD> 502 - Bad Gateway <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ϊ<EFBFBD><CEAA><EFBFBD>ػ<EFBFBD><D8BB>ߴ<EFBFBD><DFB4><EFBFBD>ʱ<EFBFBD><CAB1>Ϊ<EFBFBD><CEAA><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>һ<EFBFBD><D2BB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>÷<EFBFBD><C3B7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>˷Ƿ<CBB7><C7B7><EFBFBD>Ӧ<EFBFBD><D3A6><EFBFBD><EFBFBD> <20><>˵Web <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ػ<EFBFBD><D8BB><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD>յ<EFBFBD><D5B5><EFBFBD><EFBFBD><EFBFBD>Ч<EFBFBD><D0A7>Ӧ<EFBFBD><D3A6>
'<27><><EFBFBD><EFBFBD> 502.1 - CGI Ӧ<>ó<EFBFBD><C3B3><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><CAB1>
'<27><><EFBFBD><EFBFBD> 502.2 - CGI Ӧ<>ó<EFBFBD><C3B3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
'<27><><EFBFBD><EFBFBD> 503 - Service Unavailable <20><><EFBFBD>񲻿<EFBFBD><F1B2BBBF>ã<EFBFBD><C3A3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ά<EFBFBD><CEAC><EFBFBD><EFBFBD><EFBFBD>߸<EFBFBD><DFB8>ع<EFBFBD><D8B9><EFBFBD>δ<EFBFBD><CEB4>Ӧ<EFBFBD><D3A6><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>磬Servlet<65><74><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ݿ<EFBFBD><DDBF><EFBFBD><EFBFBD>ӳ<EFBFBD><D3B3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>·<EFBFBD><C2B7><EFBFBD>503<30><33><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>503ʱ<33><CAB1><EFBFBD><EFBFBD><EFBFBD>ṩһ<E1B9A9><D2BB>Retry-Afterͷ<72><CDB7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ϊ IIS 6.0 <20><>ר<EFBFBD>á<EFBFBD>
'<27><><EFBFBD><EFBFBD> 504 - Gateway Timeout <20><><EFBFBD>س<EFBFBD>ʱ<EFBFBD><CAB1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ϊ<EFBFBD><CEAA><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>صķ<D8B5><C4B7><EFBFBD><EFBFBD><EFBFBD>ʹ<EFBFBD>ã<EFBFBD><C3A3><EFBFBD>ʾ<EFBFBD><CABE><EFBFBD>ܼ<EFBFBD>ʱ<EFBFBD>ش<EFBFBD>Զ<EFBFBD>̷<EFBFBD><CCB7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ӧ<EFBFBD>𡣣<EFBFBD>HTTP 1.1<EFBFBD>£<EFBFBD> <20><>
'<27><> 505 - HTTP Version Not Supported <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>֧<EFBFBD><D6A7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ָ<EFBFBD><D6B8><EFBFBD><EFBFBD>HTTP<54>汾<EFBFBD><E6B1BE><EFBFBD><EFBFBD>HTTP 1.1<EFBFBD>£<EFBFBD><EFBFBD><EFBFBD>
Option Explicit

Public Enum DataEnum
    ResponseText = 1
    ResponseBody = 2
    ResponseBodyToText = 3
End Enum

Private Type TGUID
    Data1 As Long
    Data2 As Integer
    Data3 As Integer
    Data4(0 To 7) As Byte
End Type

'// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Internet<65>ϵ<EFBFBD>ͼƬ
Private Declare Function OleLoadPicturePath Lib "oleaut32.dll" (ByVal szURLorPath As Long, ByVal punkCaller As Long, ByVal dwReserved As Long, ByVal clrReserved As OLE_COLOR, ByRef riid As TGUID, ByRef ppvRet As IPicture) As Long

Public Function GetData(ByVal url As String, Optional ByVal DataStic As DataEnum) As Variant

    'On Error GoTo ERR:
    Dim XmlHttp As Object
    Dim DataS As String
    Dim DataB() As Byte
    Dim DataB2S As String

    Set XmlHttp = CreateObject("Msxml2.XMLHTTP")
    If Not IsObject(XmlHttp) Then
        Set XmlHttp = CreateObject("Microsoft.XMLHTTP")
        If Not IsObject(XmlHttp) Then Exit Function
    End If

    If url = "" Then Exit Function

    XmlHttp.Open "get", url, True
    XmlHttp.Send

    While XmlHttp.ReadyState <> 4
        DoEvents
    Wend
    '--------------------------------------<2D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
    Select Case DataStic
    Case ResponseText
        '----------------------------------ֱ<>ӷ<EFBFBD><D3B7><EFBFBD><EFBFBD>ַ<EFBFBD><D6B7><EFBFBD>
        DataS = XmlHttp.ResponseText
        GetData = DataS
    Case ResponseBody
        '----------------------------------ֱ<>ӷ<EFBFBD><D3B7>ض<EFBFBD><D8B6><EFBFBD><EFBFBD><EFBFBD>
        DataB = XmlHttp.ResponseBody
        GetData = DataB
    Case ResponseBodyToText
        '----------------------------------<2D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ת<EFBFBD>ַ<EFBFBD><D6B7><EFBFBD>[ֱ<>ӷ<EFBFBD><D3B7><EFBFBD><EFBFBD>ִ<EFBFBD><D6B4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><CAB1><EFBFBD><EFBFBD>]
        DataB2S = BytesToStr(XmlHttp.ResponseBody)
        GetData = DataB2S
    Case Else
        '----------------------------------<2D><>Ч<EFBFBD>ķ<EFBFBD><C4B7><EFBFBD>
        GetData = ""
    End Select
    '--------------------------------------<2D>ͷſռ<C5BF>
    Set XmlHttp = Nothing
    Exit Function
ERR:
    GetData = ""
End Function

Public Function PostData(ByVal strURL As String, ByVal StrData As String, ByVal DataStic As DataEnum, _
                         Optional ByVal DataType As String = "application/x-www-form-urlencoded", Optional ByVal UrlCode As Boolean) As Variant
    On Error GoTo ERR:

    Dim XmlHttp As Object
    Dim DataS As String
    Dim DataB() As Byte
    Dim DataB2S As String
    Set XmlHttp = CreateObject("Msxml2.XMLHTTP")
    If Not IsObject(XmlHttp) Then
        Set XmlHttp = CreateObject("Microsoft.XMLHTTP")
        If Not IsObject(XmlHttp) Then Exit Function
    End If

    XmlHttp.Open "POST", strURL, True
    XmlHttp.SetRequestHeader "Content-Length", Len(PostData)
    XmlHttp.SetRequestHeader "CONTENT-TYPE", DataType
    If UrlCode Then StrData = URLEncode(StrData)
    XmlHttp.Send (StrData)

    Do Until XmlHttp.ReadyState = 4
        DoEvents
    Loop
    '------------------------------------<2D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
    Select Case DataStic
    Case ResponseText
        '--------------------------------ֱ<>ӷ<EFBFBD><D3B7><EFBFBD><EFBFBD>ַ<EFBFBD><D6B7><EFBFBD>
        DataS = XmlHttp.ResponseText
        PostData = DataS
    Case ResponseBody
        '--------------------------------ֱ<>ӷ<EFBFBD><D3B7>ض<EFBFBD><D8B6><EFBFBD><EFBFBD><EFBFBD>
        DataB = XmlHttp.ResponseBody
        PostData = DataB
    Case ResponseBodyToText
        '--------------------------------<2D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ת<EFBFBD>ַ<EFBFBD><D6B7><EFBFBD>[ֱ<>ӷ<EFBFBD><D3B7><EFBFBD><EFBFBD>ִ<EFBFBD><D6B4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><CAB1><EFBFBD><EFBFBD>]
        DataB2S = BytesToStr(XmlHttp.ResponseBody)
        PostData = DataB2S
    Case Else
        '--------------------------------<2D><>Ч<EFBFBD>ķ<EFBFBD><C4B7><EFBFBD>
        PostData = ""
    End Select
    '------------------------------------<2D>ͷſռ<C5BF>
    Set XmlHttp = Nothing
    Exit Function
ERR:
    PostData = ""
End Function

'================<3D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>IP======================
Public Function GetWanIp()
    On Error Resume Next
    Dim Temp
    Temp = GetData("http://members.3322.org/dyndns/getip", ResponseBodyToText)
    Debug.Print Temp
    If Temp = "" Then
        GetWanIp = ""
    Else
        GetWanIp = Temp
    End If
End Function

'// <20><>Internet<65>ϼ<EFBFBD><CFBC><EFBFBD>ͼƬ
Public Function LoadPicture(ByVal strFileName As String) As Picture
    Dim IID As TGUID
    With IID
        .Data1 = &H7BF80980
        .Data2 = &HBF32
        .Data3 = &H101A
        .Data4(0) = &H8B
        .Data4(1) = &HBB
        .Data4(2) = &H0
        .Data4(3) = &HAA
        .Data4(4) = &H0
        .Data4(5) = &H30
        .Data4(6) = &HC
        .Data4(7) = &HAB
    End With

    On Error GoTo LocalErr

    OleLoadPicturePath StrPtr(strFileName), 0&, 0&, 0&, IID, LoadPicture
    Exit Function
LocalErr:
    Set LoadPicture = VB.LoadPicture(strFileName)
    ERR.Clear
End Function

Private Function BytesToStr(Bytes)
    Dim Unicode As String
    If IsUTF8(Bytes) Then    '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>UTF-8<><38><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>GB2312<31><32><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
        Unicode = "UTF-8"
    Else
        Unicode = "GB2312"
    End If

    Dim objstream As Object
    Set objstream = CreateObject("ADODB.Stream")
    With objstream
        .Type = 1
        .Mode = 3
        .Open
        .Write Bytes
        .Position = 0
        .Type = 2
        .Charset = Unicode
        BytesToStr = .ReadText
        .Close
    End With
End Function

'<27>ж<EFBFBD><D0B6><EFBFBD>ҳ<EFBFBD><D2B3><EFBFBD>뺯<EFBFBD><EBBAAF>
Private Function IsUTF8(Bytes) As Boolean
    On Error Resume Next
    Dim i As Long, AscN As Long, Length As Long
    Length = UBound(Bytes) + 1

    If Length < 3 Then
        IsUTF8 = False
        Exit Function
    ElseIf Bytes(0) = &HEF And Bytes(1) = &HBB And Bytes(2) = &HBF Then
        IsUTF8 = True
        Exit Function
    End If

    Do While i <= Length - 1
        If Bytes(i) < 128 Then
            i = i + 1
            AscN = AscN + 1
        ElseIf (Bytes(i) And &HE0) = &HC0 And (Bytes(i + 1) And &HC0) = &H80 Then
            i = i + 2

        ElseIf i + 2 < Length Then
            If (Bytes(i) And &HF0) = &HE0 And (Bytes(i + 1) And &HC0) = &H80 And (Bytes(i + 2) And &HC0) = &H80 Then
                i = i + 3
            Else
                IsUTF8 = False
                Exit Function
            End If
        Else
            IsUTF8 = False
            Exit Function
        End If
    Loop

    If AscN = Length Then
        IsUTF8 = False
    Else
        IsUTF8 = True
    End If

End Function

'<27><><EFBFBD>뺯<EFBFBD><EBBAAF>
Public Function URLEncode(ByRef strURL As String) As String
    Dim i As Long
    Dim tempStr As String
    For i = 1 To Len(strURL)
        If Asc(Mid(strURL, i, 1)) < 0 Then
            tempStr = "%" & Right(CStr(Hex(Asc(Mid(strURL, i, 1)))), 2)
            tempStr = "%" & Left(CStr(Hex(Asc(Mid(strURL, i, 1)))), Len(CStr(Hex(Asc(Mid(strURL, i, 1))))) - 2) & tempStr
            URLEncode = URLEncode & tempStr
        ElseIf (Asc(Mid(strURL, i, 1)) >= 65 And Asc(Mid(strURL, i, 1)) <= 90) Or (Asc(Mid(strURL, i, 1)) >= 97 And Asc(Mid(strURL, i, 1)) <= 122) Then
            URLEncode = URLEncode & Mid(strURL, i, 1)
        Else
            URLEncode = URLEncode & "%" & Hex(Asc(Mid(strURL, i, 1)))
        End If
    Next
End Function

'<27><><EFBFBD>뺯<EFBFBD><EBBAAF>
Public Function URLDecode(ByRef strURL As String) As String
    Dim i As Long

    If InStr(strURL, "%") = 0 Then URLDecode = strURL: Exit Function

    For i = 1 To Len(strURL)
        If Mid(strURL, i, 1) = "%" Then
            If Val("&H" & Mid(strURL, i + 1, 2)) > 127 Then
                URLDecode = URLDecode & Chr(Val("&H" & Mid(strURL, i + 1, 2) & Mid(strURL, i + 4, 2)))
                i = i + 5
            Else
                URLDecode = URLDecode & Chr(Val("&H" & Mid(strURL, i + 1, 2)))
                i = i + 2
            End If
        Else
            URLDecode = URLDecode & Mid(strURL, i, 1)
        End If
    Next
End Function

'UTF-8 URL<52><4C><EFBFBD><EFBFBD>
Public Function UTF8_URLEncoding(ByVal szInput As String)
    Dim wch, uch, szRet
    Dim X
    Dim nAsc, nAsc2, nAsc3
    If szInput = "" Then
        UTF8_URLEncoding = szInput
        Exit Function
    End If
    For X = 1 To Len(szInput)
        wch = Mid(szInput, X, 1)
        nAsc = AscW(wch)
       
        If nAsc < 0 Then nAsc = nAsc + 65536
       
        If (nAsc And &HFF80) = 0 Then
            szRet = szRet & wch
        Else
            If (nAsc And &HF000) = 0 Then
                uch = "%" & Hex(((nAsc \ 2 ^ 6)) Or &HC0) & Hex(nAsc And &H3F Or &H80)
                szRet = szRet & uch
            Else
                uch = "%" & Hex((nAsc \ 2 ^ 12) Or &HE0) & "%" & _
                Hex((nAsc \ 2 ^ 6) And &H3F Or &H80) & "%" & _
                Hex(nAsc And &H3F Or &H80)
                szRet = szRet & uch
            End If
        End If
    Next
    UTF8_URLEncoding = szRet
End Function


'UTF-8 URL<52><4C><EFBFBD><EFBFBD>
Public Function UTF8_URLDecode(ByVal url As String)
    Dim B, ub   ''<27><><EFBFBD><EFBFBD><EFBFBD>ֵ<EFBFBD>Unicode<64><65>(2<>ֽ<EFBFBD>)
    Dim UtfB    ''Utf-8<><38><EFBFBD><EFBFBD><EFBFBD>ֽ<EFBFBD>
    Dim UtfB1, UtfB2, UtfB3 ''Utf-8<><38><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ֽ<EFBFBD>
    Dim i, n, S
    n = 0
    ub = 0
    For i = 1 To Len(url)
        B = Mid(url, i, 1)
        Select Case B
            Case "+"
                S = S & " "
            Case "%"
                ub = Mid(url, i + 1, 2)
                UtfB = CInt("&H" & ub)
                If UtfB < 128 Then
                    i = i + 2
                    S = S & ChrW(UtfB)
                Else
                    UtfB1 = (UtfB And &HF) * &H1000   ''ȡ<><C8A1>1<EFBFBD><31>Utf-8<>ֽڵĶ<DAB5><C4B6><EFBFBD><EFBFBD>ƺ<EFBFBD>4λ
                    UtfB2 = (CInt("&H" & Mid(url, i + 4, 2)) And &H3F) * &H40      ''ȡ<><C8A1>2<EFBFBD><32>Utf-8<>ֽڵĶ<DAB5><C4B6><EFBFBD><EFBFBD>ƺ<EFBFBD>6λ
                    UtfB3 = CInt("&H" & Mid(url, i + 7, 2)) And &H3F      ''ȡ<><C8A1>3<EFBFBD><33>Utf-8<>ֽڵĶ<DAB5><C4B6><EFBFBD><EFBFBD>ƺ<EFBFBD>6λ
                    S = S & ChrW(UtfB1 Or UtfB2 Or UtfB3)
                    i = i + 8
                End If
            Case Else    ''Ascii<69><69>
                S = S & B
        End Select
    Next
    UTF8_URLDecode = S
End Function