访问 http://xxx.xxx.xxx/lib/test.js 能看到内容；web文件夹放在项目目录下；没有httprequest头部代码，我是用一个按钮启动HttpServer的：
Dim url As String = e.Form.Controls("TextBox1").Text
Dim Hb As WinForm.Button = e.Form.Controls("Button1")
If HttpServer.IsRunning Then
HttpServer.Close()
Hb.ForeColor = Color.red
e.Form.Controls("TextBox1").Enabled = True
Else
If url > ""
'添加需要监听的URL
For Each u As String In url.Replace(chr(10),"").Split(chr(13))
If u > "" Then
HttpServer.Prefixes.Add(u)
End If
Next
'HttpServer.WebPath = ProjectPath & "web\" '指定静态文件存储位置
HttpServer.Extensions.add(".pdf")
HttpServer.Start()
End If
e.Form.Controls("TextBox1").Enabled = False
Hb.ForeColor = Color.SeaGreen
End If
加好友 
发短信
Post By：2018/9/2 15:38:00 [显示全部帖子]
此主题相关图片如下：未命名_副本.jpg
此主题相关图片如下：js.png