Foxtable(狐表)用户栏目专家坐堂 → [求助]手机开发网页入门设置请教


  共有2416人关注过本帖树形打印复制链接

主题:[求助]手机开发网页入门设置请教

美女呀,离线,留言给我吧!
sweet果果
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:9 积分:142 威望:0 精华:0 注册:2020/12/12 15:40:00
[求助]手机开发网页入门设置请教  发帖心情 Post By:2020/12/14 19:29:00 [只看该作者]

我已经在西部数码网站买了服务器和域名。假设域名为: 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编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106654 积分:542453 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/12/14 20:26:00 [只看该作者]

HttpServer.Prefixes.Add("http://*/")可以不用改,或者改为
HttpServer.Prefixes.Add("http://DADA.COM/")
或者
HttpServer.Prefixes.Add("http://服务器内网IP/")

HttpServer.WebPath = "d:\web"
改为
HttpServer.WebPath = "c:\wwwroot\web" 这个必须是服务器本机目录,不明白“互联网空间”指什么?

 回到顶部
美女呀,离线,留言给我吧!
sweet果果
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:9 积分:142 威望:0 精华:0 注册:2020/12/12 15:40:00
  发帖心情 Post By:2020/12/18 10:15:00 [只看该作者]

蓝老师,如果这里用虚拟服务器空间,WWWROOT下面的web文件夹,这样写地址对吗?
HttpServer.Prefixes.Add("http://DADA.COM/")
HttpServer.WebPath = "../web"  '---------这个是虚拟服务器网站目录

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106654 积分:542453 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/12/18 10:43:00 [只看该作者]

不能这样用,只能是本机的物理地址

 回到顶部
帅哥,在线噢!
bobolan521
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:631 积分:7206 威望:0 精华:1 注册:2013/11/26 7:49:00
  发帖心情 Post By:2020/12/18 11:06:00 [只看该作者]

以下是引用sweet果果在2020/12/18 10:15:00的发言:
蓝老师,如果这里用虚拟服务器空间,WWWROOT下面的web文件夹,这样写地址对吗?
HttpServer.Prefixes.Add("http://DADA.COM/")
HttpServer.WebPath = "../web"  '---------这个是虚拟服务器网站目录
你应该买云服务器才行,你买虚拟主机是不行的,除非你用ASP,PHP来编写


 回到顶部