Foxtable(狐表)用户栏目专家坐堂 → 想在本机测试页面是否现实,尝试没有忘记的方法都不成功


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

主题:想在本机测试页面是否现实,尝试没有忘记的方法都不成功

帅哥哟,离线,有人找我吗?
zhangjian222200
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1553 积分:11003 威望:0 精华:0 注册:2016/9/12 11:18:00
想在本机测试页面是否现实,尝试没有忘记的方法都不成功  发帖心情 Post By:2018/9/17 21:56:00 [只看该作者]

httprequest代码:框架文件放在e盘web内
Dim fl As String = "e:\web\" & e.path
If filesys.FileExists(fl)
    Dim idx As Integer = fl.LastIndexOf(".")
    Dim ext As String  = fl.SubString(idx)
    Select Case ext
        Case ".jpg",".gif",".png",".bmp",".wmf",".js",".css" ,".html",".htm",".zip",".rar"
            e.WriteFile(fl)
            Return '这里必须返回
    End Select
End If

    Select Case e.Path 
        Case "index.htm"                                     '首页
            Functions.Execute("index",e)
            Return
     end select

服务器启用代码:
HttpServer.Prefixes.Add("http://127.0.0.1:90/")
HttpServer.Prefixes.Add("http://*/")
HttpServer.Start()

在浏览器输入http://127.0.0.1:90/index.htm,测试好一会了,页面也还不显示,怎么回事勒
[此贴子已经被作者于2018/9/17 21:57:09编辑过]

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


加好友 发短信
等级:超级版主 帖子:110581 积分:562801 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/9/17 22:17:00 [只看该作者]

index函数里面是什么内容?

 回到顶部
帅哥哟,离线,有人找我吗?
zhangjian222200
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1553 积分:11003 威望:0 精华:0 注册:2016/9/12 11:18:00
  发帖心情 Post By:2018/9/17 22:39:00 [只看该作者]

index页面代码没有问题,是成熟的代码,一直在服务器上显示的

[此贴子已经被作者于2018/9/19 18:20:36编辑过]

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


加好友 发短信
等级:超级版主 帖子:110581 积分:562801 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/9/17 22:53:00 [只看该作者]

测试下面能不能返回,我测试没有问题,估计应该还是index函数里面有问题

Select Case e.Path 
        Case "index.htm"                                     '首页
            e.WriteString("123456789") 
            Return
     end select

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/9/18 9:32:00 [只看该作者]

以下是引用zhangjian222200在2018/9/17 21:56:00的发言:

 
在浏览器输入http://127.0.0.1:90/index.htm,测试好一会了,页面也还不显示,怎么回事勒
[此贴子已经被作者于2018/9/17 21:57:09编辑过]

 

1、加入msgbox测试是否进入执行了代码。

 

2、看浏览器那里,调试器那里,是否报什么错。


 回到顶部
帅哥哟,离线,有人找我吗?
zhangjian222200
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1553 积分:11003 威望:0 精华:0 注册:2016/9/12 11:18:00
  发帖心情 Post By:2019/4/3 10:05:00 [只看该作者]

这个问题一直存在

启动按钮代码如下:
HttpServer.Prefixes.Add("http://127.0.0.1/")
HttpServer.Prefixes.Add("http://*/")
msgbox(0) '这里提示了
HttpServer.Start()

httprequest里面加入了好几个msgbox,都没有弹出


[此贴子已经被作者于2019/4/4 11:31:13编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/4/3 11:08:00 [只看该作者]

尝试执行,看是否报错。

 

HttpServer.close
HttpServer.Prefixes.Add("http://*/")
HttpServer.Start()


 回到顶部
帅哥哟,离线,有人找我吗?
zhangjian222200
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1553 积分:11003 威望:0 精华:0 注册:2016/9/12 11:18:00
  发帖心情 Post By:2019/4/3 11:33:00 [只看该作者]

试了,没有效果

浏览器界面与之前一样,没有反映
[此贴子已经被作者于2019/4/3 11:33:10编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/4/3 11:37:00 [只看该作者]

执行这个代码是否报错?如果报错就是有问题啊

 

HttpServer.close
HttpServer.Prefixes.Add("http://*/")
HttpServer.Start()


 回到顶部
帅哥哟,离线,有人找我吗?
zhangjian222200
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1553 积分:11003 威望:0 精华:0 注册:2016/9/12 11:18:00
  发帖心情 Post By:2019/4/3 11:59:00 [只看该作者]

确实报错了

2019-04-03 11:59:24.6718
另一个程序正在使用此文件,进程无法访问。
   在 System.Net.HttpListener.AddAll()
   在 System.Net.HttpListener.Start()
   在 Foxtable.HttpListenter.Start()


[此贴子已经被作者于2019/4/4 11:31:41编辑过]

 回到顶部
总数 11 1 2 下一页