Question

我在Azure VM上有一个VB.net Web应用程序，有一个无限循环来处理传入的SMTP电子邮件。我从主窗体的Load方法启动循环，但由于循环没有返回，Load方法永远不会返回，并且页面永远不会显示。

如何轻松地将循环放在异步运行的任务中？

Imports System.Net.Sockets
Imports System.Text
Imports System.Net.Mail
Imports System.Threading
Imports System
Imports System.IO
Imports SendGrid
Imports System.Net

Public Class MAIN_FORM

    Private Sub MAIN_FORM_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        EMAIL_READER.Main()
    End Sub
 . . . . . .

Answer 1

加载方法只是表单初始化的一部分。在窗体上放置一些控件（如GridView），并使用它们可视化来自EMAIL_HEADER的数据。

  Private Sub MAIN_FORM_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    EMAIL_READER.Main()
    GridView1.Datasource = GetData(EMAIL_READER)
End Sub

如何在Web应用程序中启动任务

1 个答案: