仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 551|回复: 7
打印 上一主题 下一主题

[学习教程] ASP教程之盘算文件下载工夫

[复制链接]
兰色精灵 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 23:39:13 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
在实现ERP等高端的ASP应用时,用户需要提供核心的经营资料,需要ASP商有很高的信用度。楼上说交互性不好,太牵强了吧。在微软提供的一套框架中,利用asp做网站,开发效率高,使用人数少,减少不必要的开销。交互性是互动方式,是有开发人员决定的。下载<%
FunctionDownloadTime(intFileSize,strModemType)
DimTimeInSeconds,ModemSpeed,strDownloadTime,AppendString
DimintYears,intWeeks,intDays
DimintHours,intMinutes,intSeconds
intYears=0
intWeeks=0
intDays=0
intHours=0
intMinutes=0
intSeconds=0
strDownloadTime=""
SelectCasestrModemType
Case"Cable"
ModemSpeed=400000
Case"56kbps"
ModemSpeed=7000
Case"33.6kbps"
ModemSpeed=4200
Case"28.8kbps"
ModemSpeed=3600
EndSelect
TimeInSeconds=int(intFileSize/ModemSpeed)
yearmathsadded1/4ofaday.1exactorbitofthesubis365.25days.
If(Int(TimeInSeconds/31471200)0)ThenintYears=Int(TimeInSeconds/31449600)
If((Int(TimeInSeconds/604800)Mod52)0)ThenintWeeks=Int(TimeInSeconds/604800)Mod52
If((Int(TimeInSeconds/86400)Mod7)0)ThenintDays=Int(TimeInSeconds/86400)Mod7
IfTimeInSeconds>=3600ThenintHours=Int(TimeInSeconds/3600)Mod24
IfTimeInSeconds>=60ThenintMinutes=Int(TimeInSeconds/60)Mod60
IfTimeInSeconds>=0ThenintSeconds=Int(TimeInSeconds)Mod60
IfintYears0Then
IfintYears=1ThenAppendString=""ElseAppendString="s"
strDownloadTime=strDownloadTime&intYears&"year"&AppendString&","
EndIf
IfintWeeks0Then
IfintWeeks=1ThenAppendString=""ElseAppendString="s"
strDownloadTime=strDownloadTime&intWeeks&"week"&AppendString&","
EndIf
IfintDays0Then
IfintDays=1ThenAppendString=""ElseAppendString="s"
strDownloadTime=strDownloadTime&intDays&"day"&AppendString&","
EndIf
IfintHours0Then
IfintHours=1ThenAppendString=""ElseAppendString="s"
strDownloadTime=strDownloadTime&intHours&"hour"&AppendString&","
EndIf
IfintMinutes0Then
IfintMinutes=1ThenAppendString=""ElseAppendString="s"
strDownloadTime=strDownloadTime&intMinutes&"minute"&AppendString
EndIf
If((intYears=0)And(intWeeks=0)And(intDays=0)And(intHours=0))Then
IfintSeconds=1ThenAppendString=""ElseAppendString="s"
IfintMinutes>0Then
strDownloadTime=strDownloadTime&","&intSeconds&"second"&AppendString
Else
strDownloadTime=strDownloadTime&intSeconds&"second"&AppendString
EndIf
EndIf
DownloadTime=strDownloadTime
EndFunction
%>
<html>
<body>
Itisgoingtotakeabout
<%=DownloadTime(123456,Cable)%>todownloadthisfile.
</body>
</html>

</p>asp是基于web的一种编程技术,可以说是cgi的一种。它可以完成以往cgi程序的所有功能,如计数器、留言簿、公告板、聊天室等等。
若天明 该用户已被删除
沙发
发表于 2015-1-18 21:31:48 | 只看该作者
学习是为了用的,是为了让你的程序产生价值,把握住这个原则会比较轻松点。除此之外,课外时间一定要多参加一些社会实践活动,来锻炼自己的能力。
金色的骷髅 该用户已被删除
板凳
发表于 2015-1-23 18:40:15 | 只看该作者
ASP.Net摆脱了以前ASP使用脚本语言来编程的缺点,理论上可以使用任何编程语言包括C++,VB,JS等等,当然,最合适的编程语言还是MS为.NetFrmaework专门推出的C(读csharp),它可以看作是VC和Java的混合体吧。
乐观 该用户已被删除
地板
发表于 2015-1-31 19:10:58 | 只看该作者
跟学别的语言一样,先掌握变量,流程控制语句(就是ifwhileselect)等,函数/过程,数组
若相依 该用户已被删除
5#
发表于 2015-2-6 21:14:20 | 只看该作者
ASP主要是用好六个对象,其实最主要的是用好其中两个:response和request,就可以随心所欲地控制网页变换和响应用户动作了。
愤怒的大鸟 该用户已被删除
6#
发表于 2015-2-18 19:34:07 | 只看该作者
完全不知道到底自己学的是什么。最后,除了教程里面说的几个例子,还是什么都不会。
小魔女 该用户已被删除
7#
发表于 2015-3-6 09:23:09 | 只看该作者
虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家,只是从一个例子告诉你怎么用。不会深入讨论,更不会将没有出现在例子里的方法都一一列举出来。
冷月葬花魂 该用户已被删除
8#
发表于 2015-3-20 05:10:18 | 只看该作者
Application:这个存储服务端的数据,如果不清除,会直到web应用程序结束才清除(例如重启站点)
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-12-23 05:16

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表