ASP网页编程之假造COOKIE及来历地点举行远程提交抓取...
写软件都是想的时间比写的时间要长的.如果反过来了就得看看是什么原因了.另外大家可以回去问问公司里的小MM.(一般企业里,跟你们交付软件接触得最多的是她们)********************************************************************************Function(私有)
称号:远程抓取函数
感化:使用XMLHTTP远程抓取数据
参数:sMethod---发送体例
sUrl------方针地点
iMode-----前往内容范例:0为二进制,1为文本,2为cookie,3为文件头信息
sBase-----设定编码
sReferer--设定来历
sCookie---设定cookie
sLanguage-设定言语
sData-----设定要发送的参数
sContent--设定吸收数据范例
sAgent----设定扫瞄器
sEncoding-设定gzip紧缩
sAccept---设定文档范例
********************************************************************************
PublicFunctionSenFe_StealData(sMethod,sUrl,iMode,sBase,sReferer,sCookie,sLanguage,sData,sContent,sAgent,sEncoding,sAccept)
DimoXmlHttp:SetoXmlHttp=Server.CreateObject("Msxml2.ServerXMLHTTP")
WithoXmlHttp
IfsMethod=""ThensMethod="GET"
.OpensMethod,sUrl,False
设定页面来历
IfsReferer""Then
.SetRequestHeader"Referer",sReferer
Else
.SetRequestHeader"Referer",Split(sUrl,"/")(2)
EndIf
IfsCookie""Then.SetRequestHeader"Cookie",sCookie设定Cookie
IfsLanguage""Then.SetRequestHeader"Accept-Language",sLanguage设定言语
IfsData""Then.SetRequestHeader"Content-Length",Len(sData)设定命据长度
IfsContent""Then.SetRequestHeader"Content-Type",sContent设定承受数据范例
IfsAgent""Then.SetRequestHeader"User-Agent",sAgent设定扫瞄器
IfsEncoding""Then.SetRequestHeader"Accept-Encoding",sEncoding设定gzip紧缩
IfsAccept""Then.SetRequestHeader"Accept",sAccept文档范例
.SendsData
While.ReadyState4
.WaitForResponse1000
Wend
If.ReadyState4Or.Status200Then
SenFe_StealData="没法取到数据!"
ExitFunction
EndIf
SelectCaseiMode
Case0SenFe_StealData=.ResponseBody
Case1
IfsBase""Then
SenFe_StealData=BytesToBstr(.ResponseBody,sBase)
Else
SenFe_StealData=.ResponseText
EndIf
Case2SenFe_StealData=.getResponseHeader("Set-Cookie")
CaseElseSenFe_StealData=.getAllResponseHeaders()
EndSelect
EndWith
EndFunction
********************************************************************************
感化:编码转换
参数:sBody-要转换的内容
sCset-编码
********************************************************************************
FunctionBytesToBstr(sBody,sCset)
WithoAdos
.Type=1
.Mode=3
.Open
.WritesBody
.Position=0
.Type=2
.Charset=sCset
BytesToBstr=.ReadText
.Close
EndWith
EndFunction源代码保护方面其实现在考虑得没那么多了..NET也可以反编译.ASP写得复杂的话别人能看得懂的话.他也有能力自己写了.这方面担心的倒不太多.纵观现在网上可以下载的那些所谓BBS还有什么网站等等的源代码 Response:从字面上讲是“响应”,因此这个是服务端向客户端发送东西的,例如Response.Write 我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页,这其中就用到了ASP,我想它的作用是可想而知的。 多看多学多思。多看一些关于ASP的书籍,一方面可以扩展知识面一方面可以鉴借别人是如何掌握、运用ASP的;多学善于关注别人,向同学老师多多学习,不论知识的大小;多思则是要将学到的知识灵活运用。 最近在学asp,不要问我为什么不直接学.net,因为公司网站是asp做的所以有这个需要,卖了本书asp入门到精通,对里面的六大内置对象老是记不住,还有很多属性和方法看的头晕。 如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质,我们可以在实践中不断提升自己,不断充实自己。 我认为比较好的方法是找一些比较经典的例子,每个例子比较集中一种编程思想而设计的。 如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质,我们可以在实践中不断提升自己,不断充实自己。
页:
[1]