|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
强大的可扩展性。ASP具有强大的扩展性,可以实现与多种网络、硬件设备的连接:通过专用的通讯线路远程接入企业;通过远程拨号服务器为远程拨号客户提供服务;通过WAP为移动电话互联网客户服务。如今我们创建第一个ASP页
<%@Language=PerlScript%>
<HTML>
<TITLE>PerlScriptTest</TITLE>
<%
for($i=0;$i<=10;$i+=2){
$Response->Write("");
$Response->Write("HelloWorld!
");
}
%>
</HTML>
在这里人人必定要注重
"$Response->Write("");"为何不必print呢?由于print是对程序而言,是间接的,而ASP是直接的输入。在ASP内里利用PerlScript是主动使用了ASP相干模块(useASP;)。这个页内容是举行轮回顺次输入字的巨细。
会见失掉服务器的变量,也不是之前那末模样了,命令是
"<%=$Request->ServerVariables(SERVER_SOFTWARE)->Item()%>"
我们一样平常在Perl内里则是
"$ENV{SERVER_SOFTWARE};"
失掉POST大概GET数据,比以往在Perl程序中简单良多。
POST:"$Request->Form(name)->Item()"
而GET:"Request->QueryString(name)->Item()"
在输入非"text/html"范例数据的时分,起首要利用模块:"Win32::OLE::Variant;",好比输入"image/GIF"Perl程序办法是:
print"Content-type:image/GIF
";
而在PerlScript顶用:
$Response->{ContentType}="image/GIF";
输入数据办法则是:
$Response->BinaryWrite(Win32::OLE->Variant(VT_UI1,$image));
获得ASP的毛病信息:
"$ASPError=$Server->GetLastError();"
设置扫瞄器Cookies:"
$Response->Cookies->SetProperty(
种别,
Cookies,
这是一个Cookies
);
"
设置同意URL:"
$Response->Cookies(Cookie)->{Domain}=tanshuai.net;
"
设置过时工夫:"
$Response->Cookies(someCookie)->{Expires}=January1,2001;
"
数据库毗连:"
<%
#创建毗连ADOBD的工具
#
$Conn=$Server->CreateObject("ADODB.Connection");
#翻开体系DSN
#
$Conn->Open("Tanshuai");
#实行SQL查询
#
$RS=$Conn->Execute("SELECT*FROMOrders");
#获得方针查询行列数
$count=$RS->Fields->{Count};
#输入显现每一个行列名
#
for($i=0;$i<$count;$i++){
$Response->Write($RS->Fields($i)->Name);
$Response->Write("
");
};
#输入一切行列值
#
while(!$RS->{EOF}){
for($i=0;$i<$count;$i++){
$Response->Write("");
$Response->Write($RS->Fields($i)->{Value});
$Response->Write("
");
};
#挪动到下一个记录
#
$RS->MoveNext();
};
#封闭一切工具
#
$RS->Close();
$Conn->Close();
%>
在PerlScript中sub、if、else、elseif、foreach、while、声明变量、翻开文件、字符处置都、挪用模块文件都是依照之前的模样。只是在关于Web服务器间的特别处置,必要利用特别办法。
别的#在剧本编写的时分仍旧是作为注解标记,并且必定要记得每一个剧本命令停止后必需要填写";"停止标记。
经由过程本文您已把握了怎样用Perl的Perl剧本(PerlScript)编写ASP了。Perl的壮大服从和普遍的兼容性,是没有任何一个手艺可比的。今朝Perl可嵌进手艺包括:C嵌进Perl、Java嵌进Perl、ASP嵌进Perl、Apache嵌进Perl、WSH嵌进Perl、WSC嵌进Perl……
Perl实际上是一个复杂易学的通用信息手艺言语,我以为如今提高盘算机,起首应当提高的就是Perl言语了,PERL比BASIC天然很多。仿佛人们在措辞,它的编写体例就仿佛我们处置事件一样。学会了Perl,不仅对你进修别的言语(诸如:C/C++、JAVA)有很年夜的增进、匡助并加速进修进度,Perl的壮大开展趋向,可让您"投机倒把",在别的盛行的编程手艺中嵌进,如许在您不明白或是以为一种算法很贫苦的时分,用Perl来匡助你快速的完成。让您在别的言语中从Perl渐渐退化成该种言语,是相称顺遂的安稳过渡。我发明在进修Perl今后,进修别的言语速率有很年夜的加速。
asp可以轻松地实现对页面内容的动态控制,根据不同的浏览者,显示不同的页面内容。而浏览者一点觉察不出来,就像为他专门制作的页面一样。使用各种各样的组件,asp可以完成无比强大的功能。 |
|