仓酷云

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

[学习教程] ASP网页设计asp主动收罗进库办法

[复制链接]
莫相离 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:48:47 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

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

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

x
asp,你就只能等着微软给你解决,它不乐意你就只好悲催。而且asp跑在windows服务器上,windows服务器跟linux比起来简直弱爆了!收罗比来网下流行着一些收罗程序,更多人拿着这些器材在网上叫卖,良多不太懂的人看着那些程序眼羡,实在假如你懂一些ASP,懂得主动收罗程序的道理后,你会感到完成主动化也是那末的复杂.
道理及长处:经由过程XML中的XMLHTTP组件挪用别的网站上的网页,然后批量截取或交换原本的信息使其转化成变量后再逐一贮存到数据库中。其次要的长处即是无需再手工增加大批的信息了,能够指定对某一个站信息的截取举行批量录进,到达省时省力的目标。与其纯真的ASP小偷程序分歧的是:它已不再依附其方针网站。
复杂事例:
<%
声明获得方针信息的函数,经由过程XML组件举行完成。
FunctionGetURL(url)
SetRetrieval=CreateObject("Microsoft.XMLHTTP")
WithRetrieval
.Open"GET",url,False
.Send
GetURL=bytes2bstr(.responsebody)
对获得信息举行考证,假如信息长度小于100则申明截取失利
iflen(.responsebody)<100then
response.write"猎取远程文件<ahref="&url&"target=_blank>"&url&"</a>失利。"
response.end
endif

EndWith
SetRetrieval=Nothing
EndFunction
二进制转字符串,不然会呈现乱码的!
functionbytes2bstr(vin)
strreturn=""
fori=1tolenb(vin)
thischarcode=ascb(midb(vin,i,1))
ifthischarcode<&h80then
strreturn=strreturn&chr(thischarcode)
else
nextcharcode=ascb(midb(vin,i+1,1))
strreturn=strreturn&chr(clng(thischarcode)*&h100+cint(nextcharcode))
i=i+1
endif
next
bytes2bstr=strreturn
endfunction
声明截取的格局,从Start入手下手截取,到Last为停止
FunctionGetKey(HTML,Start,Last)
filearray=split(HTML,Start)
filearray2=split(filearray(1),Last)
GetKey=filearray2(0)
EndFunction

DimSoftid,Url,Html,Title

猎取要取页面的ID

SoftId=Request("Id")

  Url="http://www3.skycn.com/soft/"&SoftId&".html"

  Html=GetURL(Url)

以截取天空软件的软件名为例子

  Title=GetKey(Html,"<fontcolor=#004FC6size=3>","</font></b></td></tr>")

翻开数据库,筹办进库

dimconnstr,conn,rs,sql

connstr="DBQ="+server.mappath("db1.mdb")+";DefaultDir=;DRIVER={MicrosoftAccessDriver(*.mdb)};"

setconn=server.createobject("ADODB.CONNECTION")

conn.openconnstr

setrs=server.createobject("adodb.recordset")

sql="select[列名]from[表名]where[列名]="&Title&""

rs.opensql,conn,3,3

ifrs.eofandrs.bofthen

rs("列名")=Title

rs.update

setrs=nothing

endif

setrs=nothing

Response.Write"收罗终了!"

%>实现规模效益。与传统的用户拥有硬件软件所有权和使用权以及传统的应用服务商提供一对一的服务模式不同,ASP拥有应用系统所有权,用户拥有使用权,应用系统集中放在ASP的数据中心中,集中管理,分散使用,以一对多的租赁的形式为众多用户提供有品质保证的应用技术服务,实现规模效益。
小魔女 该用户已被删除
沙发
发表于 2015-1-17 15:27:18 | 只看该作者
Server:这个表示的服务器,操作服务器的一些工具使用这个,如Server.Mappath转换服务器路径,Server.CreateObject实例化一个组件
飘飘悠悠 该用户已被删除
板凳
发表于 2015-1-18 07:50:48 | 只看该作者
从事这个行业,那么你可以学ASP语言,简单快速上手,熟练dreamweav排版,写asp代码,熟练photoshop处理图片,打好基础就行了
兰色精灵 该用户已被删除
地板
发表于 2015-1-21 12:23:36 来自手机 | 只看该作者
不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍
山那边是海 该用户已被删除
5#
发表于 2015-1-30 18:09:38 | 只看该作者
封装性使得代码逻辑清晰,易于管理,并且应用到ASP.Net上就可以使业务逻辑和Html页面分离,这样无论页面原型如何改变,业务逻辑代码都不必做任何改动;继承性和多态性使得代码的可重用性大大提高。
飘灵儿 该用户已被删除
6#
发表于 2015-2-6 14:44:33 | 只看该作者
Server:这个表示的服务器,操作服务器的一些东西使用这个,如Server.Mappath转换服务器路径,Server.CreateObject实例化一个组件
透明 该用户已被删除
7#
发表于 2015-2-16 16:39:36 | 只看该作者
如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助:
莫相离 该用户已被删除
8#
 楼主| 发表于 2015-3-5 07:08:08 | 只看该作者
ASP也是这几种脚本语言中最简单易学的开发语言。但ASP也是这几种语言中唯一的一个不能很好支持跨平台的语言。  因为ASP脚本语言非常简单,因此其代码也简单易懂,结合HTML代码,可快速地完成网站的应用程序。
活着的死人 该用户已被删除
9#
发表于 2015-3-12 00:03:47 | 只看该作者
ASP.Net和ASP的最大区别在于编程思维的转换,而不仅仅在于功能的增强。ASP使用VBS/JS这样的脚本语言混合html来编程,而那些脚本语言属于弱类型、面向结构的编程语言,而非面向对象,这就明显产生以下几个问题:
愤怒的大鸟 该用户已被删除
10#
发表于 2015-3-19 16:54:13 | 只看该作者
弱类型造成潜在的出错可能:尽管弱数据类型的编程语言使用起来回方便一些,但相对于它所造成的出错几率是远远得不偿失的。
谁可相欹 该用户已被删除
11#
发表于 2015-3-29 08:53:41 | 只看该作者
在平时的学习过程中要注意现学现用,注重运用,在掌握了一定的基础知识后,我们可以尝试做一些网页,也许在开始的时候我们可能会遇到很多问题,比如说如何很好的构建基本框架。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

GMT+8, 2024-4-29 10:10

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

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