vb6基于API版WINSOCK控件

这是一个控件版的，用法比 cls 类的简单。，和winsock 几乎一样

立即下载

Option Explicit

Dim WithEvents instHttpServer As vbman.cServer

Private Sub Command1_Click()
    mConfig.SetHttpConfig instHttpServer.Config
    instHttpServer.Start
End Sub

Private Sub Command2_Click()
    '        vbman.Echo.Main Now
End Sub

Private Sub Form_Load()
    Set instHttpServer = New vbman.cServer
    
End Sub

Private Sub instHttpServer_Logs(Content As String)
    List1.AddItem Content, 0
End Sub

Views: 109