如何部署F＃Azure WebJob？

我可以實際部署F＃控制檯應用程序作爲Azure WebJob嗎？在VS2017中找不到合適的選項:(如何部署F＃Azure WebJob？

如果可能的話，你能看看我的代碼嗎？它會像我將它部署爲AzureWebJob那樣工作嗎？我需要改變一些東西嗎？

open FSharp.Data; 
open System 
open System.Net.Mail 


let server = "smtp.gmail.com" 
let sender = "[email protected]" 
let password = "password" 
let port = 587 
let SendTest email topic msg = 
    use msg = 
     new MailMessage(
      sender, email, topic, 
      msg) 
    let client = new SmtpClient(server, port) 
    client.EnableSsl <- true 
    client.Timeout <- 20000 
    client.DeliveryMethod <- SmtpDeliveryMethod.Network 
    client.UseDefaultCredentials <- false 
    client.Credentials <- System.Net.NetworkCredential(sender, password) 
    client.Send msg 


let metaTitle (doc:HtmlDocument) = 
    doc.Descendants "meta" 
    |> Seq.choose (fun x -> 
     match x.AttributeValue("name"), x.AttributeValue("property") with 
     | "title", _ 
     | "headline", _ 
     | "twitter:title", _ 
     | _, "og:title" -> 
      Some(x.AttributeValue("content")) 
     | _, _ -> None 
    ) 

let titles (doc:HtmlDocument) = 
    let tagged (tag:string) = 
     doc.Descendants tag |> Seq.map (fun x -> x.InnerText()) 
    Seq.concat [tagged "title"; metaTitle doc; tagged "h1"] 

let title (doc:HtmlDocument) = 
    titles doc |> Seq.tryHead 


let finalTitle (link:string) = try 
           link 
           |> HtmlDocument.Load 
           |> titles 
           |> Seq.head 
           with 
           | :? Exception as ex -> ex.Message 

[<EntryPoint>] 
let main argv = 
    let website = "website.com" 
    if(finalTitle website <> "expected title") 
    then 
      SendTest "[email protected]" "Status: Failed" (website + " is down :(") 

    0 // return an integer exit code

來源

2017-04-13 Dmytro Zhluktenko