inrgs-CSDN博客

转载用ASP把图片存入数据库

一、设计数据库testimg.mdb为方便调试，设计表imgurl，其中两个字段：id（自动编号、关键字）、img（OLE 对象）二、连接数据库文件conn.asp db_path="testimg.mdb"set conn=server.CreateObject("ADODB.connection")connstr="driver={Microsoft Access Driver

2007-03-27 14:18:00 1342

转载 AJAX开发的通用类

2007-03-25 23:38:00 1103 6

转载带进度条的多文件ASP无组件上传

【摘要】介绍带进度条的多文件ASP无组件上传源代码,这个路径需要在提交的时候传入上载组件中，以便在上载过程中更改进度数据，客户端使用javascript来读取此XML文件。此例子文档编码都是UTF-8,如果是其他编码的系统，请将编码转换为相应的编码，不然表单获取数据可能会乱码Dim objUpload,optDim xmlPathDim fileFormName,objFile,c

2007-03-25 23:34:00 1845

转载创建网站的RSS内容摘要

【摘要】 RSS 是一种 XML 格式的文档，那么我们就应当可以对后台数据库中的数据按照条件进行筛选、组织，然后通过 ASP 生成 XML 格式的数据流，最后发送到客户端进行浏览。既然 RSS 是一种 XML 格式的文档，那么我们就应当可以对后台数据库中的数据按照条件进行筛选、组织，然后通过 ASP 生成 XML 格式的数据流，最后发送到客户端进行浏览。数据的选取、汇集是 Asp 的

2007-03-25 23:31:00 1167

转载 ASP动态网页生成静态Html网页代码

【摘要】生成html网页有利于被搜索引擎收录,不仅被收录的快还收录的全.前台脱离了数据访问,减轻对数据库访问的压力,加快网页打开速度。网页生成静态Html文件有许多好处,比如生成html网页有利于被搜索引擎收录,不仅被收录的快还收录的全.前台脱离了数据访问,减轻对数据库访问的压力,加快网页打开速度. 所以吟清最近对生成html比较感兴趣,看了不少文章,也有一点点收获. 1,下面这

2007-03-25 23:28:00 6236

转载 ASP中自定义文件下载

【摘要】如果 sDownFilePath 为绝对路径，一定要将 sDownFilePath 转换为相对本文件的相对路径。　　可以用流下载(耗内存，少用)或直接转到该文件.Const USE_STREAM = 0 0.不用流(Adodb.Stream)下载 1.用流下载Const ALLOW_FILE_EXT = "rar,zip,chm,doc,xls,swf,mp3,gi

2007-03-25 23:19:00 794

转载 asp检测文件编码

摘要】 ANSI的本地编码，都是各国自己定义的，没有固定的文件头格式，在大陆中文操作系统下，是可读的gb2312，在其他语言的系统下，就是乱码，所以这部分没必要再详细区分得到文件编码。原理：用stream对象预读文件的头两个字节,分析判断出utf-8，unicode，ANSI(简体中文操作系统，即gb2312)编码相关资料：补充：ANSI的本地编码，都是各国自己定义的，

2007-03-25 23:14:00 859

转载 ASP调用SQL Server视图和存储过程

【摘要】在一般的MIS应用中，会有大量的报表，此时我们可以在后台数据库编写相应的视图或存储过程，用ASP通过ADO调用以完成报表工作。下面用一个例子说明相应的操作过程。一、前言 ASP (Active Server Pages) 是服务器端的脚本编写环境，它由微软公司的IIS3.0以上版本支持。它可用来创建动态 Web 页或生成功能强大的 Web应用程序。ASP页是包括 HTML

2007-03-25 22:57:00 1075

转载 XMLHttpRequest对象详解

【摘要】 XMLHttpRequest对象是当今所有AJAX和Web 2.0应用程序的技术基础。尽管软件经销商和开源社团现在都在提供各种AJAX框架以进一步简化XMLHttpRequest对象的使用。 XMLHttpRequest对象是当今所有AJAX和Web 2.0应用程序的技术基础。尽管软件经销商和开源社团现在都在提供各种AJAX框架以进一步简化XMLHttpRequest对象的使用

2007-03-25 22:51:00 5411 1

转载 ASP验证码

%Call Com_CreatValidCode("ValidCode")Sub Com_CreatValidCode(pSN) 禁止缓存Response.Expires = -9999 Response.AddHeader "Pragma","no-cache"Response.AddHeader "cache-ctrol","no-cache"Response.ContentType =

2007-03-24 14:32:00 2433

转载身份证校验码算法（一）

身份证校验码产生方法：∑(ai×Wi)(mod 11)i: 表示号码字符从由至左包括校验码在内的位置序号；ai 表示第i位置上的号码字符值；Wi 第i位置上的加权因子，其数值Wi=mod(power(2,(n-1)),11)i 18 17 16 15 14 13 12 11 10 9 8 7 6 5 4 3 2 1Wi 7 9 10 5 8 4 2 1 6 3 7 9 10 5 8

2007-02-18 23:00:00 6410

原创使用与 Win32API 文件通用对话框打开对话框

http://support.microsoft.com/kb/161286/ Option Explicit Private Declare Function GetOpenFileName Lib "comdlg32.dll" Alias _ "GetOpenFileNameA" (pOpenfilename As OPENF

2007-01-30 11:20:00 1670

原创 cPage - ASP分页类

<!-- Class cPagePrivate pagePublic pagesizePrivate cRsPrivate isEofPrivate Sub class_initialize()pagesize = 10 初始页大小isEof = Falsepage = Request.QueryString("page")If Trim( page ) =

2007-01-28 20:52:00 1295

转载 VB中文件操作的两种方式

VB中文件操作的两种方式作者：不详　来源于：中国VB网　发布时间：2006-4-30 文本文件的操作此种方式是以行为单位进行读取的基本单位，主要应用的方法和函数有Open,Close,Line Input,Fr

2007-01-26 18:07:00 1691

转载 VB文本加密类

加密与解密函数说明:　　CharSting　　加密或解密的数据　　Key　　　　　加密或解密的密钥函数返回值:　　1. CharString为空时返回"1"　　2. 加密或解密失败返回"0"　　3. 成功则返回加密或解密后的字符串Public Function EDcode$(CharString As String, Key As Integer) Dim X As Sing

2007-01-26 17:44:00 2077 1

原创 VB写日志类

Option ExplicitPublic gstrLogPath As StringPrivate Sub Class_Initialize() gstrLogPath = App.Path & "/Log" Log路径End Sub*********************************************************************

2007-01-25 16:26:00 7011 1

转载 Request.ServerVariables大全

ASP.NET语法:Request.ServerVariables [int index]; Request.ServerVariables [string name];asp语法:Request.ServerVariables (server environment variable); 参数服务器环境变量指定要检索的服务器环境变量名。可以使用下面列出的值。

2007-01-24 17:51:00 671

转载 SLE4432/4442函数库

Declare Function srd_4442()Function srd_4442 Lib "mwic_32.dll" (ByVal icdev As Long, ByVal offset As Integer, ByVal le As Integer, ByVal data_buffer$) As IntegerDeclare Function srd_4442_hex()Functi

2007-01-24 11:52:00 4067 1

转载在VB中创建多线程

在VB中创建线程用到以下几个API函数：创建线程API此API经过改造，lpThreadAttributes改为Any型，lpStartAddress改为传值引用：因为函数入口地址是由形参变量传递，如果用传址那将传递形参变量的地址而不是函数的入口地址参数dwStackSize为应用程序堆栈大小，lpStartAddress为函数入口地址Private Declare

2007-01-19 14:54:00 869

转载《解读女人》

《解读女人》现代社会，女人们也懂得享受了。男人们可以在牌桌上成千上万的豪赌，女人们也会在各种高档的消费场所一掷千金；男人们可以肆无忌惮的泡妞，女人们也会闲来无事去掉掉凯子；男人们可以包个二奶，女人们也不甘示弱，索性养个小白脸；男人们不是去嫖鸡么？好，那女人们干脆就去叫鸭……专家说，这就是社会的进步，物质和精神上的发达，带来的是人性的平等。也难怪“女权”是这两年报章杂志上，出现频率较高的词汇

2007-01-19 05:13:00 882

转载 VB编程之路－如何让界面美化

VB编程之路－如何让界面美化作者：漏洞多多　来源于：中国VB网　发布时间：2005-5-20 如果大家用过《Windows优化大师》，肯定会被它的界面所倾倒，其实利用ActiveSkin 就可以办到,甚至更爽,但是如果要做的共享软件只是一个

2007-01-15 14:01:00 2990

转载 VB实现在PC上通过手机发短消息

VB实现在PC上通过手机发短消息作者：不详　来源于：中国VB网　发布时间：2006-12-30 很早以前,就注意到一些手机短消息的发送软件,当时觉得那是多么的神奇,可是从来没有想过去开发一个自己的手机短消息软件.临近毕业,要做毕业论文,我选

2007-01-15 13:25:00 1134

原创 JavaScript公用函数

//去全部空格 String.prototype.trim = function(){ return this.replace(/(^/s*)|(/s*$)/g, ""); } //去左边空格 String.prototype.ltrim = function(){ return this.replace(/(^/s*)/g, "");

2007-01-13 16:14:00 858

原创 VB常用类

clsADOOption ExplicitDim sIniFilePath As StringDim sSort As StringDim sDataSource As String 数据源Dim sDataBase As String 数据库名Dim sUser As String 用户名Dim sPass As String 密码Dim

2007-01-12 10:39:00 1097

inrg's blog