我已经在西部数码网站买了服务器和域名。假设域名为: DADA.COM,IP为10.153.163.178,
WeUI文件我已经放在了互联网空间wwwroot下的web文件夹。
用以下代码开启http服务网的地址改如何修改,然后手机可以输入域名或者IP就可以访问addnew.htm呢?
刚刚接触FOX请高手多指点小妹一下,感谢呀:
HttpServer.Prefixes.Add("http://*/") '-----------怎么修改呢
HttpServer.WebPath = "d:\web" '-----------怎么修改呢
HttpServer.Start()
将HttpRequest事件代码设置为:
Select Case e.Path
Case "addnew.htm"
Dim wb As New WeUI '定义一个基于weui框架的网页生成器
wb.AddForm("","form1","addnew.htm")
With wb.AddInputGroup("form1","ipg1","新增订单")
.AddSelect("cp","产品","PD01|PD02|PD03|PD04|PD05")
.AddInput("gy","雇员","text")
.AddInput("kh","客户","text")
.AddInput("dj","单价","number")
.AddInput("zk","折扣","number")
.AddInput("sl","数量","number")
.AddInput("rq","日期","date")
End With
With wb.AddButtonGroup("form1","btg1",True)
.Add("btnok","确定")
End With
e.WriteString(wb.Build) '生成网页
End Select
[此贴子已经被作者于2020/12/14 19:35:18编辑过]