简单的web服务器无需iis

易语言 2020-08-24 18:15:25

简单的web服务器无需iis

_启动窗口.编辑框_路径.加入文本 (“访问 ” + 彗星URL解码_UTF8 (文件名) + #换行符)
.' 如果真 (文件名 = “/”)
' ' 分割文本 = 分割文本 (编辑框2.内容, “|”, )
' 分割文本 = 分割文本 (“index.html|index.htm|index.txt|index.jpg|index.bmp|index.png|index.gif”, “|”, )
.' 计次循环首 (取数组成员数 (分割文本), i)
' 处理事件 ()
.' 如果真 (文件是否存在 (_启动窗口.编辑框_路径.内容 + 分割文本 [i]))
' 返回 (_启动窗口.编辑框_路径.内容 + 分割文本 [i])
.如果真结束

.' 计次循环尾 ()
' 返回 (_启动窗口.编辑框_路径.内容 + “index.html”)
.如果真结束
' 文件名 = 子文本替换 (文件名, “/”, “\”, , , 真)
' 返回 (_启动窗口.编辑框_路径.内容 + 彗星URL解码_UTF8 (文件名))