国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁(yè) > 編程 > .NET > 正文

使用perl.net訪問(wèn)數(shù)據(jù)庫(kù)

2024-07-10 13:04:35
字體:
來(lái)源:轉(zhuǎn)載
供稿:網(wǎng)友
中國(guó)最大的web開(kāi)發(fā)資源網(wǎng)站及技術(shù)社區(qū),
不只是vb.net,c#等微軟的開(kāi)發(fā)軟件可以調(diào)用.net framework,據(jù)我所知至少有28中我知道的開(kāi)發(fā)語(yǔ)言如何調(diào)用.net framework.下面我就給出一段事例,說(shuō)明使用perl.net來(lái)訪問(wèn)數(shù)據(jù)庫(kù)
<%@ page language="perl" %>
<script runat="server">

use namespace "system::data";
use namespace "system::data::sqlclient";

=for interface
    protected override void onload(system.eventargs e);
=cut

sub onload {
   my($this, $e) = @_;

   my $myconnection = sqlconnection->new("data source=(local); trusted_connection=yes; initial catalog=pubs");
   my $mycommand = sqlcommand->new("select * from publishers", $myconnection);
            
   $myconnection->open();

   $this->{mydatagrid}{datasource} = $mycommand->executereader(perlnet::enum("commandbehavior.closeconnection"));
   $this->{mydatagrid}->databind;
}

</script>
<html>
<body>
<form runat="server">
<asp:datagrid id="mydatagrid" runat="server" />
</form>
</body>
</html>
發(fā)表評(píng)論 共有條評(píng)論
用戶名: 密碼:
驗(yàn)證碼: 匿名發(fā)表
主站蜘蛛池模板: 柞水县| 离岛区| 松桃| 鹿邑县| 海盐县| 济南市| 新闻| 绿春县| 福清市| 吴旗县| 青海省| 习水县| 东方市| 葫芦岛市| 新宁县| 象山县| 仲巴县| 金川县| 石台县| 盈江县| 密山市| 儋州市| 平武县| 宁强县| 子洲县| 井陉县| 全椒县| 河池市| 康马县| 阳山县| 中西区| 云浮市| 沁阳市| 十堰市| 桃源县| 织金县| 内丘县| 郎溪县| 英山县| 游戏| 霍邱县|