国产探花免费观看_亚洲丰满少妇自慰呻吟_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ā)表
主站蜘蛛池模板: 双辽市| 勃利县| 社旗县| 西和县| 姚安县| 安龙县| 沁阳市| 新竹市| 建始县| 通海县| 长春市| 伊春市| 马鞍山市| 汶川县| 张北县| 三江| 中江县| 中阳县| 武宣县| 永清县| 凤山县| 郴州市| 晋州市| 辉南县| 亳州市| 双牌县| 壤塘县| 易门县| 南川市| 仁布县| 和田市| 万年县| 桐乡市| 阜宁县| 宜丰县| 宽甸| 苍南县| 龙口市| 保康县| 祥云县| 谢通门县|