Today I successfully implemented the code for consuming WCF REST service in F#. Funny part here is that, this is my first program in F#.. LOL
Ok.. Here is the code for consuming WCF REST in F#.
module FSModule
#light
open System
open System.Text
open System.Net
open System.IO
open System.Web
// F# uses indenting to define scope. So ensure that you indent properly to get it working
let GetDataFromRest =
let buffer = Encoding.ASCII.GetBytes("<HelloService_SayHello><input>Hello from F#</input></HelloService_SayHello>") //This is needed if its a POST call
let req = WebRequest.Create(new Uri("http://localhost/HelloService.svc/SayHello")) :?> HttpWebRequest
req.Method <- "POST"
req.ContentType <- "application/xml" //Use accordingly XML or JSON
req.ContentLength <- int64 buffer.Length
let reqSt = req.GetRequestStream()
reqSt.Write(buffer,0,buffer.Length)
reqSt.Flush()
req.Close()
let res = req.GetResponse () :?> HttpWebResponse
let resSt = res.GetResponseStream()
let sr = new StreamReader(resSt)
let x = sr.ReadToEnd()
sr.Close()
x.ToString()
Done... To invoke this, you can either use F# or C# or even VB.NET :)
F#
let result = GetDataFromRest()
printfn result
C#
string result = FSModule.GetDataFromRest()
Ok.. Here is the code for consuming WCF REST in F#.
module FSModule
#light
open System
open System.Text
open System.Net
open System.IO
open System.Web
// F# uses indenting to define scope. So ensure that you indent properly to get it working
let GetDataFromRest =
let buffer = Encoding.ASCII.GetBytes("<HelloService_SayHello><input>Hello from F#</input></HelloService_SayHello>") //This is needed if its a POST call
let req = WebRequest.Create(new Uri("http://localhost/HelloService.svc/SayHello")) :?> HttpWebRequest
req.Method <- "POST"
req.ContentType <- "application/xml" //Use accordingly XML or JSON
req.ContentLength <- int64 buffer.Length
let reqSt = req.GetRequestStream()
reqSt.Write(buffer,0,buffer.Length)
reqSt.Flush()
req.Close()
let res = req.GetResponse () :?> HttpWebResponse
let resSt = res.GetResponseStream()
let sr = new StreamReader(resSt)
let x = sr.ReadToEnd()
sr.Close()
x.ToString()
Done... To invoke this, you can either use F# or C# or even VB.NET :)
F#
let result = GetDataFromRest()
printfn result
C#
string result = FSModule.GetDataFromRest()
Thanks a ton! this helped me finish one confused program..feel so exited! Thanks and keep updating
ReplyDeletehp 1020 driver
no deposit bonus forex 2021 - takipçi satın al - takipçi satın al - takipçi satın al - takipcialdim.com/tiktok-takipci-satin-al/ - instagram beğeni satın al - instagram beğeni satın al - google haritalara yer ekleme - btcturk - tiktok izlenme satın al - sms onay - youtube izlenme satın al - google haritalara yer ekleme - no deposit bonus forex 2021 - tiktok jeton hilesi - tiktok beğeni satın al - binance - takipçi satın al - uc satın al - finanspedia.com - sms onay - sms onay - tiktok takipçi satın al - tiktok beğeni satın al - twitter takipçi satın al - trend topic satın al - youtube abone satın al - instagram beğeni satın al - tiktok beğeni satın al - twitter takipçi satın al - trend topic satın al - youtube abone satın al - instagram beğeni satın al - tiktok takipçi satın al - tiktok beğeni satın al - twitter takipçi satın al - trend topic satın al - youtube abone satın al - instagram beğeni satın al - perde modelleri - instagram takipçi satın al - instagram takipçi satın al - cami avizesi - marsbahis
ReplyDeletemmorpg oyunlar
ReplyDeleteİnstagram Takipçi Satin Al
tiktok jeton hilesi
tiktok jeton hilesi
SAC EKİM ANTALYA
instagram takipçi satın al
ınstagram takipçi satın al
Mt2 pvp serverlar
instagram takipçi satın al