Uses wodWebServer ActiveX component

Dim WithEvents wodWebServer1 As wodWebServerCom
Private Sub Form_Load()
    Set wodWebServer1 = New wodWebServerCom

    'If you don't want that your server bind to all your network interfaces.
    'You can specify inside BindIP Property which network interface you want to use.
    wodWebServer1.BindIP = "192.168.1.1"
	    
    wodWebServer1.DocumentRoot = App.Path
    wodWebServer1.Start 'Start a web server
End Sub 

Uses wodWebServer.NET component

Dim WithEvents wodWebServer1 As WeOnlyDo.Server.WebServer
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    wodWebServer1 = New WeOnlyDo.Server.WebServer

    'If you don't want that your server bind to all your network interfaces.
    'You can specify inside BindIP Property which network interface you want to use.
    wodWebServer1.BindIP = "192.168.1.1"
	
    wodWebServer1.DefaultPage = "index.html" 'Specify default page file
    wodWebServer1.DocumentRoot = "C:\Web"
    wodWebServer1.Start() 'Start a web server
End Sub

Uses wodWebServer.NET Component

WeOnlyDo.Server.WebServer wodWebServer1;
private void Form1_Load(object sender, EventArgs e)
{
    wodWebServer1 = new WeOnlyDo.Server.WebServer();

    //If you don't want that your server bind to all your network interfaces. 
    //You can specify inside BindIP Property which network interface you want to use.
    wodWebServer1.BindIP = "192.168.1.1";

    wodWebServer1.DefaultPage = "index.html"; //Specify default page file
    wodWebServer1.DocumentRoot = "C:\\Web";
    wodWebServer1.Start(); //Start a web server
}