主题：网络监视器和开启移动代码与服务器的问题

请教老师，参照帮助做了几个学习移动的功能，使用本机网址和局域网网址没有问题，但是配置远程服务器过程中遇到如下几个疑问，特请教老师

租用了阿里云的服务器后，以下代码怎样进行匹配（自己试写的代码都未能实现）

1. HTTPServer.Prefixes.Add 的//:*/ 与FTP有冲突不能用，阿里云的公网怎样匹配进来（本机电脑测得公网网址120.**.***.193:ms-***-server）

2.网络监视器或自定义函数

Dim fl As String = "f:\web\" & e.path '这里的f:\web\是本机电脑内的路径，如果发布后要把项目复制到阿里云服务器上，是否要改成阿里云服务器上的存放web的盘符，比如e:\web\      
 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",".ico"
            e.WriteFile(fl)
             Return  '这里必须返回
    End  Select
 End  If

3.登录页面

If UserName = "张三" AndAlso Password = "888" Then  '实际使用的时候,请改为从数据库读取用户名和密码进行比较，这里怎样改为从数据库读取用户名和密码

1、你用iis搭建的ftp？iis默认使用的是80端口，你可以禁用一下 https://www.baidu.com/baidu?wd=iis+80+%D5%BC%D3%C3&tn=monline_4_dg

2、你可以把web文件夹放在项目文件夹下，然后把代码改成 Dim fl As String = ProjectPath & "web\" & e.path

3、改成

Dim dr As DataRow = DataTables("表A").Find("用户名 = '" & username & "'")

If dr IsNot Nothing AndAlso dr("密码") = password Then