Invoking webservices using dotnet variables
smshyd
Member Posts: 72
Hi experts ,
I found below link for invoking webservices
http://codeverge.com/asp.net.handlers-m ... ttp/211661
oRequest = (HttpWebRequest)WebRequest.CreateDefault(oURI);
oResponse = CType(oRequest.GetResponse, HttpWebResponse);
where variables are given below
I found below link for invoking webservices
http://codeverge.com/asp.net.handlers-m ... ttp/211661
Dim oURI As New System.Uri(msURL)
Dim oRequest As HttpWebRequest
oRequest = CType(WebRequest.CreateDefault(oURI), HttpWebRequest)
oRequest.Method = "POST"
oRequest.ContentType = "text/html"
oRequest.KeepAlive = True
oRequest.Timeout() = miConnectorTimeout
oRequest.Credentials = New NetworkCredential(msUserID, msPassword)
Dim oResponse As HttpWebResponse
oRequest.ContentLength = sHeader.Length
Dim oStream As New StreamWriter(oRequest.GetRequestStream, Encoding.ASCII)
oStream.Write(sHeader)
oStream.Close()
oResponse = CType(oRequest.GetResponse, HttpWebResponse)
If oResponse.StatusCode = 200 Then
Dim oReader As New StreamReader(oResponse.GetResponseStream)
Return oReader.ReadToEnd
ElseIf oResponse.StatusCode = 401 Then
Return "Unauthorized"
End If
I have mapped navision code as follows
msURL := 'http://tempuri.org/sometext';
Ouri := Ouri.Uri(msURL);
//oRequest = (HttpWebRequest)WebRequest.CreateDefault(oURI);
oRequest.Method := 'POST';
oRequest.ContentType := 'text/html'; //'XML'
oRequest.KeepAlive := TRUE;
oRequest.Timeout := 10;
oRequest.Credentials(NetworkCredential);
oRequest.ContentLength := 1024;
oStream := oStream.StreamWriter(oRequest.GetRequestStream);
oStream.Write('demo');
oStream.Close;
//oResponse = CType(oRequest.GetResponse, HttpWebResponse)
IF oResponse.StatusCode = 200 THEN BEGIN
oReader := oReader.StreamReader(oResponse.GetResponseStream);
oReaderReadtoend := oReader.ReadToEnd ;
END ELSE
IF oResponse.StatusCode = 401 THEN BEGIN
MESSAGE('Unauthorized');
END;
How can I map below 2 lines code in navision which containing typecastingoRequest = (HttpWebRequest)WebRequest.CreateDefault(oURI);
oResponse = CType(oRequest.GetResponse, HttpWebResponse);
where variables are given below
Name DataType Subtype Length oRequest DotNet System.Net.HttpWebRequest.'System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089' oResponse DotNet System.Net.HttpWebResponse.'System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089' Ouri DotNet System.Uri.'System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089' msURL Text NetworkCredential DotNet System.Net.NetworkCredential.'System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089' oStream DotNet System.IO.StreamWriter.'mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089' oReader DotNet System.IO.StreamReader.'mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089' oReaderReadtoend Text
0
Comments
-
should be written as:oRequest = (HttpWebRequest)WebRequest.CreateDefault(oURI);oRequest := WebRequest.Create(msURL);
should be written as:oResponse = CType(oRequest.GetResponse, HttpWebResponse);oResponse := oRequest.GetResponse()
0 -
I m trying your solution but I m unable to find System.Net.HttpWebResponse in .net library.0
-
You can copy and paste in the variable DotNet Subtype part the following:
System.Net.HttpWebResponse.'System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089'
Regards.0
Categories
- All Categories
- 73 General
- 73 Announcements
- 66.7K Microsoft Dynamics NAV
- 18.7K NAV Three Tier
- 38.4K NAV/Navision Classic Client
- 3.6K Navision Attain
- 2.4K Navision Financials
- 116 Navision DOS
- 851 Navision e-Commerce
- 1K NAV Tips & Tricks
- 772 NAV Dutch speaking only
- 617 NAV Courses, Exams & Certification
- 2K Microsoft Dynamics-Other
- 1.5K Dynamics AX
- 324 Dynamics CRM
- 111 Dynamics GP
- 10 Dynamics SL
- 1.5K Other
- 990 SQL General
- 383 SQL Performance
- 34 SQL Tips & Tricks
- 35 Design Patterns (General & Best Practices)
- 1 Architectural Patterns
- 10 Design Patterns
- 5 Implementation Patterns
- 53 3rd Party Products, Services & Events
- 1.6K General
- 1.1K General Chat
- 1.6K Website
- 83 Testing
- 1.2K Download section
- 23 How Tos section
- 252 Feedback
- 12 NAV TechDays 2013 Sessions
- 13 NAV TechDays 2012 Sessions
