- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助] 如何写httpserver启动代码？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=130826)
-- 发布时间：2019/2/2 22:29:00
-- [求助] 如何写httpserver启动代码？
如何同时启动这三个ip 如下图：启动代码如何写？
此主题相关图片如下：1.jpg
[此贴子已经被作者于2019/2/2 22:29:51编辑过]
-- 发布时间：2019/2/3 9:15:00
--
Dim url As String = e.Form.Controls("TextBox1").Text
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 = "d:\\web"
HttpServer.Start()
End If
-- 发布时间：2019/2/3 22:22:00
--
非常感谢，在春节之际您还能给于答复，感谢！
祝您及你们公司的全体员工新年快乐！工作顺利，2019发发发！！！