用VB设计的Active控件打包在网上发布如何得到HTM的地址

Question

用Active控件设计了一个界面，用VB工具打包在内网发布（生成一个CAB档和一个HTM文件），如何在程式设计时可以得到HTM的地址。例如我将这两个档案（CAB和HTM）放在我的IIS 的wwwroot目录下，在浏览器下输入http://192.168.0.1/htm文件,程式就可以得到地址http://192.168.0.1

Answer 1

一般这样处理
在activex中定义属性，在网页中表现为param,加上初始值即可Public Property Let IP(ByVal New_IP As String)
    txtip.Text() = New_IP
    PropertyChanged "IP"
End Property<OBJECT WIDTH=507 HEIGHT=440
 CLASSID="CLSID:154573A5-39E4-43C9-868E-1A919800AE7C" codebase="get.ocx">
    <PARAM NAME="_ExtentX" VALUE="13388">
    <PARAM NAME="_ExtentY" VALUE="11642">
    <PARAM NAME="IP" VALUE="192.168.0.1">
    <PARAM NAME="CPort" VALUE="2004">
</OBJECT>

Answer 2

回复online,
    我不想通过网页中设置param取得，这样IIS的IP改，我的代码也要更着改.但我知道是可以得到的。
   就象UserDocument中能够取得浏览器的IP地址一样。
   Code 如下：
   Dim inter As InternetExplorer
   
   Private Sub UserDocument_Show()
       Dim IP as String
       set inter =UserDocument.Parent
       IP =inter.LocationURL
   End Sub

Answer 3

online,
   您在帮帮我吧！！

Answer 4

参考一下吧http://blog.csdn.net/online/archive/2004/08/09/68873.aspx
http://blog.csdn.net/online/archive/2004/08/09/68874.aspx