वेबसाइट सेवा

Question

के कॉल के दौरान संवाद (मूल प्रमाणीकरण संकेत) को रोकने के लिए कैसे करें एक डेल्फी प्रोग्राम (सेवा के रूप में चल रहा है) में मुझे कुछ वेबसाइसेस कॉल करने की आवश्यकता है।
यदि मूल प्रमाणीकरण की आवश्यकता नहीं है तो कॉल ठीक काम करता है। कॉल भी ठीक काम करता है, तो मूल प्रमाणीकरण requerired जाता है और उपयोगकर्ता नाम/पासवर्ड प्रदान की जाती है (BeforePost में) का उपयोग:

InternetSetOption(Data, INTERNET_OPTION_USERNAME,... 
InternetSetOption(Data, INTERNET_OPTION_PASSWORD,... 

लेकिन अगर बुनियादी प्रमाणीकरण Requeried, और उपयोगकर्ता नाम है/पासवर्ड प्रदान नहीं की है, कार्यक्रम वायुसेना शीघ्र लाता है उपयोगकर्ता नाम/पासवर्ड के लिए (एक servcice में नो-गो है)।

तो मैं कैसे संकेत दे सकता हूं कि मुझे कोई संकेत नहीं चाहिए, बल्कि इसके बजाय एक त्रुटि?

समस्या यह है कि, जैसा कि मैं इसे कर सकता हूं, SOAPHTTPTrans फ़ंक्शन THTTPReqResp.Send (const ASrc: TStream): Integer; (लाइन 762 (इंटरनेट एरर डीएलजी मैं दूसरी विधि के लिए दूसरी कॉल))।

EDIT1:
अगर मैं (SOAPHTTPTRANS में) भेजने विधि की शुरुआत में झंडे को बदलने INTERNET_FLAG_NO_AUTH शामिल करने के लिए, यह काम करता है के रूप में मैं चाहता था।
लेकिन मैं SAOPHTTPTrans (यदि संभव हो) को बदले बिना ऐसा कैसे करूं?

EDIT2:

ws := THTTPRIO.Create(Self); 
ws.URL := 'http://excample.com/ws.asmx'; 
ws.HTTPWebNode.InvokeOptions := [soIgnoreInvalidCerts]; 
ws.HTTPWebNode.OnBeforePost := WebServiceCallBeforePost; 
AvailabilityWebservice := (ws as AvailabilityServiceSoap); 
sTemp := AvailabilityWebservice.GetVersion; 

कहाँ AvailabilityServiceSoap डबल्यूएसडीएल आयातक उपयोग करते हुए उत्पन्न इंटरफेस है।

Answer 1

आप एक नई कक्षा बना सकते हैं जो THTTPReqResp से प्रवेश करता है और प्रेषण विधि को ओवरराइड करता है ताकि आप अपने स्वयं के ध्वज शामिल कर सकें। आप नई कक्षा का उपयोग कर ws.HTTPWebNode को एक नए नोड पर सेट करने में सक्षम होना चाहिए।

कुछ

ws := THTTPRIO.Create(Self); 
MyNewNode := MyNewClass.Create; 
ws.HTTPWebNode := MyNewNode; 
ws.URL := 'http://excample.com/ws.asmx'; 
ws.HTTPWebNode.InvokeOptions := [soIgnoreInvalidCerts]; 
ws.HTTPWebNode.OnBeforePost := WebServiceCallBeforePost; 
AvailabilityWebservice := (ws as AvailabilityServiceSoap); 
sTemp := AvailabilityWebservice.GetVersion; 

Answer 2

जैसे कि मैंने जब एक वेब फिल्टर के माध्यम से विंडोज लाइव मैसेंजर काम करने देने के लिए कोशिश कर रहा है इस समस्या थी।

मैंने small program लिखना समाप्त कर दिया जो हर बार स्वतः प्रमाणीकृत करता है।

आशा है कि इससे आपको भी मदद मिलेगी।

uses 
    ... IdHTTP ...; 

... 
var 
    httpGetter: TIdHTTP; 
...  
httpGetter.Request.Username := username; 
httpGetter.Request.Password := password; 
httpGetter.HandleRedirects := True; 
httpGetter.Request.BasicAuthentication := True; 

//custom useragent required to let live messenger work 
//this part is probably not necessary for your situation 
httpGetter.Request.UserAgent := 'MSN Explorer/9.0 (MSN 8.0; TmstmpExt)'; 

httpGetter.Get(url,MS); 
... 

Answer 3

पहले सर्वर प्रमाणीकरण मोड की जांच कैसे करें?

http://en.wikipedia.org/wiki/Basic_access_authentication

• ग्राहक एक पेज के लिए पूछता है कि प्रमाणीकरण की आवश्यकता है लेकिन एक उपयोगकर्ता नाम और पासवर्ड प्रदान नहीं करता है। आमतौर पर ऐसा इसलिए होता है क्योंकि उपयोगकर्ता बस पते दर्ज किया गया है या पृष्ठ के एक लिंक के बाद।
• सर्वर 401 प्रतिक्रिया कोड के साथ प्रतिक्रिया करता है और प्रमाणीकरण क्षेत्र प्रदान करता है।

तो ग्राहक सेवा आवेदन एक प्राप्त भेजने के लिए और देखने प्रतिक्रिया

WW-Authenticate: Basic realm="Secure Area"