DataLink 对话框(来自 ASP)





0/5 (0投票)
2006年1月24日

28274

274
一个 ActiveX 控制,允许 ASP 用户显示数据链接对话框。
引言
这个 ActiveX 控制允许用户从客户端机器上列出的数据提供程序构建连接字符串。该 ActiveX 调用标准 DataLink 对话框,该对话框列出所有数据提供程序以及有效连接字符串所需的参数。该对话框还会测试连接。
使用代码
dl
:显示 DataLink 对话框的 ActiveX 对象。OpenDl
:打开 DataLink 对话框。connectin
:DataLink 对话框返回的字符串。
使用 VBScript 调用 ActiveX 控制方法。
<HEAD>
<title>Test Datalink Dialog from .Net</title>
<meta content="Microsoft Visual Studio .NET 7.1"
name="GENERATOR">
<meta content="C#" name="CODE_LANGUAGE">
<meta content="JavaScript" name="vs_defaultClientScript">
<meta content="http://schemas.microsoft.com/intellisense/ie5"
name="vs_targetSchema">
<script language="vbscript">
Sub cmdChange_Click
dl.openDl
document.forms(0).txtConnectionString.Value = _
dl.connectin
End Sub
</script>
</HEAD>
<body MS_POSITIONING="GridLayout">
<OBJECT id="dl" codeBase="dl.CAB#version=1,0,0,0"
height="0" width="0"
classid="CLSID:ED467200-646D-46ED-992A-418EC94C319F"
VIEWASTEXT>
<PARAM NAME="_ExtentX" VALUE="26">
<PARAM NAME="_ExtentY" VALUE="26">
</OBJECT>
<form id="Form1" method="post" runat="server">
<asp:TextBox id="txtConnectionString"
style="Z-INDEX: 101; LEFT: 16px; POSITION: absolute; TOP: 64px"
runat="server"></asp:TextBox>
<INPUT TYPE="button" id="dlName2"
NAME="dlName2" VALUE="test" OnClick="cmdChange_Click"
style="Z-INDEX: 102; LEFT: 176px; POSITION: absolute; TOP: 64px">
<asp:Label id="Label1"
style="Z-INDEX: 103; LEFT: 24px; POSITION: absolute; TOP: 32px"
runat="server" Width="344px"
Font-Size="Larger">Datalink Dialog</asp:Label>
</form>
</body>
</HTML>
关注点
ActiveX 对我来说是一个全新的世界。我是一个核心 .NET 程序员。我过去不喜欢 VB 6,但我不得不承认,它非常适合创建 ActiveX 控制。它们提供完全的系统访问权限。在互联网上运行有点风险,但在特定环境(如内联网)中,它们可能非常有用。
历史
到目前为止,这是第一个版本,它是为特定的客户需求而创建的。可以进行大量的改进,但是我现在没有时间。