编程论坛
400万+工程师在用
华为|鸿蒙开发者日
直播报名
400万+工程师在用
华为|鸿蒙开发者日
直播报名

电子发烧友网工程师

17年用户 16436经验值
擅长:可编程逻辑 MEMS/传感技术 测量仪表 模拟技术 控制/MCU RF/无线
私信 关注

Handler 属性范例 (VB)

2009-1-8 10:21

<p><font face="Verdana">Handler 属性范例 (VB)</font></p><font face="Verdana">
<p><br/>本范例演示 RDS DataControl 对象的 Handler 属性。(有关详细信息,请参阅 DataFactory 自定义。)</p>
<p>假设在服务器上的参数文件 MSDFMAP.INI 中有下列部分:</p>
<p>[connect AuthorDataBase]<br/>Access=ReadWrite<br/>C<br/>[sql AuthorById]<br/>SQL="SELECT * FROM Authors WHERE au_id = ?"</p>
<p>用户代码如下。分配给 SQL 属性的命令将与 AuthorById 标识符匹配,并检索作者 Michael O'Leary 的行。虽然用户代码中的 Connect 属性指定 Northwind 数据源,但是该数据源将被 MSDFMAP.INI connect 节覆盖。将 DataControl 对象 Recordset 属性分配给断开连接的 Recordset 对象只是为了便于编码。</p>
<p><br/>Public Sub Main()<br/>&nbsp;&nbsp;&nbsp; HandlerX<br/>End Sub</p>
<p>Public Sub HandlerX()<br/>Dim dc As New DataControl<br/>Dim rst As ADODB.Recordset</p>
<p>dc.Handler = "MSDFMAP.Handler"<br/>dc.Server = "http://YourServer"<br/>dc.C<br/>dc.SQL = "AuthorById(267-41-2394)"<br/>dc.Refresh&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Retrieve the record<br/>Set rst = dc.Recordset&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Use another Recordset as a convenience<br/>debug.Print "Author is '" &amp; rst!au_fname &amp; " " &amp; rst!au_lname &amp; "'"</p>
<p>End Sub</p>
<p></font>&nbsp;</p>

更多回帖

打开APP