度量快速开发平台中，有很多非常有意思的方法提供给二次开发人员使用，笔者从实际使用的案例中就使用过多个很不错的方法，本次重点给大家介绍一下ServerURL()方法的使用场景及用法。
ServerURL() 方法，是度量快速开发平台中的窗体方法，直接使用，用于获取平台服务端的地址，使用示例： Msgbox( ServerURL() )
度量快速开发平台中，一般来说，服务端的地址是确定的，二次开发人员都是能获取。为什么需要这么一个方法呢？ 在实际的客户使用中，可能有不同的网络结构，例如在医院，医院存在一个临床的内网（一般不能连接到互联网），还存在一个行政办公的网络，基本上是可以连接互联网的。如果要在这类单位中使用度量快速开发平台二次构建的管理软件，需要全单位的人员都使用系统。 为了各系统的安全性，部分单位采用了设置两个网段进行。临床内网的环境中使用一个服务端地址（例如192.168.100），行政办公环境使用另外一个服务端地址（例如172.3.10.10）。还有的使用单位采用内网用内部IP地址，行政办公或者家里工作，服务端地址采用域名。 如果不提供这个方法，内网和外网用户在访问的时候，就不知道自己当前是在哪一个网段，那服务端的一些数据显示或者处理，可能就会出现错误。 度量快速开发平台是很好支持这类多服务端地址配置的系统，不同网络段的人员，访问服务器端的地址，就直接根据平台提供的ServerURL()方法得到，不需要人为再去判断是内网还是外网用户。 四、使用案例 在某个医院系统使用中，各内部发文通过word流转，发布后用HTML显示，发布的时候，我们向服务器端保存了一个HTML文档，并在系统中记录了文档后缀地址。医院系统采用的是院内工作采用内网IP地址,院外登录系统采用域名方式。以下代码是展示院内与院外用户登录到系统中，查看服务器端的HTML文档方法： | '文档查看 '根据内外网用户自动获取服务端已经保存好的文档。 'dim domainName="http://xxx.XXYYZZ.com/" 'dim domainName="http://170.3.100.100/" dim domainName=ServerUrl() '查询网页的地址 dim fileurl=ExecuteScalar("select nvl(max('HtmlDocument/'||file_folder||'/'||file_name ),'NULL') from delit_office_document where filetype='HTML' and recordid='"&Me.Input2&"'") if Me.Input1="VIEW" then '已经发布了的html if fileurl<>"NULL" then 文档显示部件1.TemplateUrl=domainName&fileurl else showmessage("发布的信息不存在，可能是已经删除或撤销。",2) end if 文档显示部件1.RefreshData() end if |
| 
[复制链接]
发表于 2020-3-30 10:45:48
QQ好友和群
QQ空间
腾讯微博
腾讯朋友
收藏
楼主
发表于 2020-4-2 08:44:22
