|
| |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
<@ Page language="COBOL"> <html> <head> <script runat ="server" language="COBOL"> ENVIRONMENT DIVISION. CONFIGURATION SECTION. REPOSITORY. PROPERTY DataSource PROPERTY myDataGrid CLASS SqlConnection AS "System.Data.SqlClient.SqlConnection" CLASS SqlCommand AS "System.Data.SqlClient.SqlCommand" CLASS SqlDataReader AS "System.Data.SqlClient.SqlDataReader" CLASS Sys-EventArgs AS "System.EventArgs" CLASS Sys-Type AS "System.Type". OBJECT. PROCEDURE DIVISION. METHOD-ID. ONLOAD AS "OnLoad" OVERRIDE. DATA DIVISION. WORKING-STORAGE SECTION. 01 mySqlConnection OBJECT REFERENCE SqlConnection. 01 mySqlCommand OBJECT REFERENCE SqlCommand. 01 mySqlDataReader OBJECT REFERENCE SqlDataReader. 01 myType OBJECT REFERENCE Sys-Type. 01 dataSource OBJECT REFERENCE ICollection. LINKAGE SECTION. 01 args OBJECT REFERENCE Sys-EventArgs. PROCEDURE DIVISION USING BY VALUE args. INVOKE SUPER "OnLoad" USING BY VALUE args. INVOKE SqlConnection "New" USING BY VALUE "Data Source=(local); Trusted_Connection=Yes; Initial Catalog=pubs" RETURNING mySqlConnection. INVOKE SqlCommand "New" USING BY VALUE "Select * From Publishers" mySqlConnection RETURNING mySqlCommand. INVOKE mySqlConnection "Open". INVOKE mySqlCommand "ExecuteReader" RETURNING mySqlDataReader. SET DataSource OF myDataGrid TO mySqlDataReader. INVOKE myDataGrid "DataBind". INVOKE mySqlConnection "Close". END METHOD ONLOAD. END OBJECT. </script> </head> <body> <form runat ="server"> <asp:DataGrid id="myDataGrid" runat ="Server" /> </form> </body> </html> 返回类别: 教程 上一教程: 改善C#中socket通信机客户端程序的健壮性 下一教程: 微软的远程处理框架.NET Remoting(转天极网)之一 您可以阅读与"使用COBOL.net访问数据库"相关的教程: · 使用perl.net访问数据库 · Dotnet总结(2)--访问ms sql server 数据库基类--2 · 使用ADO.NET轻松操纵数据库 · 在ASP+中访问数据库 · 用asp.net还原与恢复sqlserver数据库 |
| 快精灵印艺坊 版权所有 |
首页 |
||