asp获取本页的URL地址
作者:gray6666 日期:2010年3月9日
<%
Function GetLocationURL()
Dim Url
Dim ServerPort,ServerName,ScriptName,QueryString
ServerName = Request.ServerVariables("SERVER_NAME")
ServerPort = Request.ServerVariables("SERVER_PORT")
...
asp获取网页的html代码
作者:gray6666 日期:2010年3月9日
有时候,需要获取网页的html代码,如新闻采集。采集之前，首页要得到被采集的页面的html代码，然后根据代码，分析出你想要得到的内容，最后将得到的内容保存到自己的数据库中
function.asp
<%
Function getHTTPPage(url)
On Error Resume Next
dim http
set http=Server.createobject("Microsoft.XMLHTTP")
...
asp使用 ajax post 提交汉字出现乱码问题解决的解决方案
作者:gray6666 日期:2010年3月9日
产生原因
主要有2个原因
1 xtmlhttp 返回的数据默认的字符编码是utf-8，如果前台页面是gb2312或者其它编码数据就会产生乱码
2 post方法提交数据默认的字符编码是utf-8，如果后台是gb2312或其他编码数据就会产生乱码
解决方法
进一步整理中
推荐方法,前台后台都用utf-8编码,这样可以省不少麻烦,从根本上解决了乱码问题.优点是效率高,而且符合目前的形式,utf-8编码本身就是一种比较优秀的编码,没有语言限制.缺点只能调用自己的后台编码或者其他的utf-8的编码.
...
request对象示例-以及读取集合的顺序
作者:gray6666 日期:2010年3月9日
Request对象可以读取任何基于HTTP请求传递的信息，包括从HTML表格用 post 或 get 方法传递的参数，用Cookie，用户认证传递的参数及文件上载.
语法格式：Request.集合（变量）
1 Form集合
语法格式:Request.Form(element名)[(index)|.Count]
该集合的语句功能是可以用Form集合手机来自客户端以表单形式发往服务器的信息。其中个参数的意义如下:
(1)element:是表单中某元素的名称，即表单元素中nam右边的取值
...
ASP实现把ACCESS数据库中的数据导入TXT文件
作者:gray6666 日期:2010年3月9日
1，建立一个数据库test.mdb，字段分为testID，testPhoto 插入数据
2，写一个xiaohei.log
3，写一个test.asp
代码：
<%
'连接ACCESS数据库
set conn=server.createobject("adodb.connection")
provider="provider=microsoft.jet.oledb.4.0;"
...
ASP采集程序 原理分析
作者:gray6666 日期:2010年3月9日
采集程序实际上是通过了XML中的XMLHTTP组件调用其它网站上的网页。比如新闻采集程序，很多都是调用了sina的新闻网页，并且对其中的html进行了一些替换，同时对广告也进行了过滤。用采集程序的优点有：无须维护网站，因为采集程序中的数据来自其他网站，它将随着该网站的更新而更新；可以节省服务器资源，一般采集程序就几个文件，所有网页内容都是来自其他网站。缺点有：不稳定，如果目标网站出错，程序也会出错，而且，如果目标网站进行升级维护，那么采集程序也要进行相应修改；速度，因为是远程调用，速度和在本地服务器上读取数据比起来，肯定要慢一些。
...asp实现随机获取数据库中的记录
作者:gray6666 日期:2010年3月9日
利用asp随机获取数据库中的记录且不出现重复的记录
<!--#include file="adoconn.asp"-->
<%
'-------------------------检索数据-----------------------
strSQL = "SELECT * FROM [table]"
'Sql语句，检索数据库
'Set objRS = Server.CreateObject("ADODB.Recordset")
...
asp获取客户端IP地址
作者:gray6666 日期:2010年3月9日
客户端IP有两种情况，一个是代理服务器上网的，另一种是直接上网的，所以要获取客户端IP也需要分开来获取。
<%
Function getIP()
Dim strIPAddr
If Request.ServerVariables("HTTP_X_FORWARDED_FOR") = "" OR InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), "unknown") >0 Then
...
用ASP 开发的日历
作者:gray6666 日期:2010年3月9日
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>Canlender--JavaScript</title>
<style>
td {
font-family: Arial, Helvetica, sans-serif;
...
用ASP实现网页打印
作者:gray6666 日期:2010年3月9日
主要介绍了如何使用ASP控制Web的各种打印效果，它能够控制纵打、横打和页面边距等。
1、控制"纵打"、 "横打"和"页面的边距"。
（1）
<script defer>
function SetPrintSettings() {
// -- advanced features
factory.printing.SetMarginMeasure(2) // measure margins in inches
...