汉字简体繁体转换

<center><h3>汉字简体繁体转换</h3> <input type=button onclick="convert('s')" value="转化为简体"><input type=button onclick="convert('t')" value="转化为繁体"><br><textarea id=txt rows=10 cols=50 value=''></textarea><br><input type=hidden name=h1 value=0><img width=0 height=100><hr>Simple is beauty.<script>//*****...
2007-11-01 21:38 | 阅读 3401 次 | 评论 0 条

用C#创建Windows服务(Windows Services)

Windows服务在Visual Studio 以前的版本中叫NT服务,在VS.net启用了新的名称。用Visual C# 创建Windows服务不是一件困难的事,本文就将指导你一步一步创建一个Windows服务并使用它。这个服务在启动和停止时,向一个文本文件中写入一些文字信息。第一步:创建服务框架 要创建一个新的 Windows 服务,可以从Visual C# 工程中选取 Windows 服务(Windows Service)选项,给工程一个新文件名,然后点击 确定。 你可以看到,向导向工程文件中增加WebService1.cs类:如下图来设置属性:其中各属性的含意是: Autol...
2007-09-27 02:28 | 阅读 4284 次 | 评论 0 条

Asp.net(C#)常用函数表

1、DateTime 数字型 System.DateTime currentTime=new System.DateTime(); 1.1 取当前年月日时分秒 currentTime=System.DateTime.Now; 1.2 取当前年 int 年=currentTime.Year; 1.3 取当前月 int 月=currentTime.Month; 1.4 取当前日 int 日=currentTime.Day; 1.5 取当前时 int 时=currentTime.Hour; 1.6 取当前分 int 分=currentTime.Minute; 1.7 取当前秒 int 秒=cu...
2007-08-12 19:06 | 阅读 1961 次 | 评论 0 条

SQL语句大全

SQL语句大全 --语 句 功 能--数据操作SELECT --从数据库表中检索数据行和列INSERT --向数据库表添加新数据行DELETE --从数据库表中删除数据行UPDATE --更新数据库表中的数据--数据定义CREATE TABLE --创建一个数据库表DROP TABLE --从数据库中删除表ALTER TABLE --修改数据库表结构CREATE VIEW --创建一个视图DROP VIEW --从数据库中删除视图CREATE INDEX --为数据库表创建一个索引DROP INDEX --从数据库中删除索引CREATE PROCEDURE --创建一个存储过程 ...
2007-03-31 04:39 | 阅读 2050 次 | 评论 0 条

返回长度为Length的随机数函数

<%'返回长度为Length的随机数Public Function Randomizer(Length) Dim CharArray(36),Result,TempStr '初始化数组 CharArray(0)="0" CharArray(1)="1" CharArray(2)="2" CharArray(3)="3" CharArray(4)="4" CharArray(5)="5" CharArray(6)="6" CharArray(7)="7" CharArray(8)="8" CharArray(9)="9" CharArray(10)="A" ...
2007-03-01 09:06 | 阅读 2240 次 | 评论 0 条

ASP 内建对象速查卡

ASP 内建对象速查卡 Application 对象 集合: Contents StaticObjects 方法: Lock Unlock 事件: Application_OnEnd Application_OnStart ObjectContext 对象 方法: SetAbort SetComplete 事件: OnTransactionAbort OnTransactionCommit Request 对象 集合: ClientCertificate Cookies Form QueryString ServerVariables 属性: TotalBytes 方法:...
2007-01-24 19:25 | 阅读 1929 次 | 评论 0 条

一个上传函数的类(怎么只能20M呢?)

<!--文件上传 --><!--#include file="config.asp"--><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><html><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><title>Upload Files</title><style><!--* BODY{background:#ffffff;} .p9{ font-size: 9pt; font-family: 宋体...
2006-11-03 19:11 | 阅读 1842 次 | 评论 0 条

如何用ASP读取Excel文件

1。ASP对Excel的基本操作 1)建立Excel对象 Set objExcelApp=CreateObject(Excel.Application) objExcelApp.DisplayAlerts=false'不显示警告 objExcelApp.Application.Visible=false‘不显示界面 2)读取已有的Excel文件 strAddr=Server.MapPath(".") objExcelApp.WorkBooks.Open(strAddr &amp; "TempletTable.xls") Set objExcelBook=objExcelA...
2006-11-03 15:07 | 阅读 3793 次 | 评论 0 条

ASP限制某些IP访问网站

具体编程如下:<% url_str=c.ServerVariables("REMOTE_ADDR")url=split(url_str,".")if url(0)=127 and url(1)=0 and url(2)=0 and url(3)>0 and url(3)<256 thenelseresponse.Write(url_str)end if%>
2006-11-03 05:20 | 阅读 1423 次 | 评论 0 条

ASP中实现SQL数据库备份、恢复

在ASP中备分恢复ACCESS是很EASY的事情 那么SQL呢? 1、备份 <% SQL="backup database 数据库名 to disk='"&amp;Server.MapPath("backup")&amp;""&amp;"backuptext.dat"&amp;"'" set cnn=Server.createobject("adodb.connection") cnn.open "driver={SQL Server};Server=服务器名;uid=sa;pwd=" cnn.execute SQL on error resume next if err<>0 then...
2006-10-21 19:19 | 阅读 1574 次 | 评论 0 条

asp在SQL SER2k中新建帐号和给帐号权限的实现

' 以下为在asp中增加一个sql server2000用户函数,并为建立一个数据库,给他dbo的权限 ' ****************注意:sql server的验证方式不要选仅为windows方式, ' **************** 允许远程sql server连接 ' ****************该函数已通过测试**************************** ' 有什么问题欢迎和我交流,以后会推出对sql server的一些管理操作程序 ' 参数:StrLoginName:新增登录名,StrPwd:登录名的密码,StrDBName:新建数据库名 '...
2006-10-21 19:18 | 阅读 1265 次 | 评论 0 条

ASP实现文件直接下载

在IE进行文档链接时,如果遇到OLE支持的文档,IE会自动调用相应程序打开它,有时候这种功能并不是我们所需的,虽然我们可以提醒用户用鼠标右键-->"目标另存为...."命令来下载文档,但这样毕竟不太友好,本文描述了利用FSO及Stream方法实现IE直接下载文档. <%@ language=vbscript codepage=65001%> <% 'Filename must be inputif Request("Filename")="" then response.write "<h1>Error:</h1>Filename is empty!<p>"elsecall ...
2006-10-19 14:13 | 阅读 1587 次 | 评论 0 条

纯ASP代码之公历转农历实现(含属相(1)

<!--#include File="clsDay.asp"--><%Dim objChinaDay Dim sDay, sWeekDay, sChinaDay, sChinaYear,sChinaAniSet objChinaDay = New ChinaDayCall objChinaDay.Action("",sDay,sWeekDay,sChinaYear,sChinaDay,sChinaAni)Set objChinaDay = Nothing'Response.Write sDay&amp;"<BR>"'Response.Write sWeekDay&amp;"<BR...
2006-10-16 13:46 | 阅读 1606 次 | 评论 0 条

纯ASP代码之公历转农历实现(含属相)

<%'Option Explicit'***********************************************' 类名称:ChinaDay' 用途:' 根据输入的日期计算该日期的农历天干地支及当年属相' 使用方法:' 第一个参数为输入参数,不填写默认为当日,' 只计算1921-2-8之后的日期' ##-------------------------------------------##' Dim objChinaDay ' Dim sDay, sWeekDay, sChinaDay, sChinaYear,sChinaAni' Set objChinaDay ...
2006-10-16 13:46 | 阅读 1782 次 | 评论 0 条

ASP网站漏洞解析及黑客入侵防范方法

如何更好的达到防范黑客攻击,本人提一下个人意见!第一,免费程序不要真的就免费用,既然你可以共享原码,那么攻击者一样可以分析代码。如果在细节上注意防范,那样你站点的安全性就大大的提高了。即使出现了SQL Injection这样的漏洞,攻击者也不可能马上拿下你的站点。   由于ASP的方便易用,越来越多的网站后台程序都使用ASP脚本语言。但是, 由于ASP本身存在一些安全漏洞,稍不小心就会给黑客提供可乘之机。事实上,安全不仅是网管的事,编程人员也必须在某些安全细节上注意,养成良好的安全习惯,否则会给自己的网站带来巨大的安全隐患。目前,大多数网站上的ASP程序有这样那样的安全漏洞,但如果编...
2006-10-16 13:40 | 阅读 1633 次 | 评论 0 条

如何让图片自动缩放以适合界面大小

If Instr(strType,"[image]")>0 And ZC_UBB_IMAGE_ENABLE Then '[img] objRegExp.Pattern="(\[IMG=)([0-9]*),([0-9]*),(.*)(\])(.+?)(\[\/IMG\])" strContent= objRegExp.Replace(strContent,"<img onload='javascript:if(this.width>400)this.width=400;' src=""$6"" alt=""$4"" title=""$4"" width=""$2"" h...
2006-10-16 13:34 | 阅读 2233 次 | 评论 0 条

ASP发送HTML格式的mail

sub sendPassworddim myMailset myMail= Server.CreateObject("CDONTS.Newmail")myMail.From = "tingweb@8848.net"myMail.To = "tingweb@8848.net"myMail.Subject = "tingweb@8848.netTRY"myMail.BodyFormat = 0myMail.MailFormat = 0dim HTMLHTML = "&amp;lt;!DOCTYPE HTML PUBLIC '-//IETF//DTD HTML//EN'&amp;gt;"HTM...
2006-10-04 22:14 | 阅读 2331 次 | 评论 0 条

如何防盗链一例

<%'判断用的地址 MYhttp="www.abc.com|abc.com|www.aaa.com"MYhttp="abc.com" Public Function ISmydown(MYhttp)Dim strReferer, isHttp, strHostNameisHttp = FalsestrReferer = Request.ServerVariables("HTTP_REFERER")strHostName = Split(MYhttp, "|") For i = 0 To UBound(strHostName) If InStr(strReferer, Trim...
2006-10-04 21:58 | 阅读 2161 次 | 评论 0 条
浏览106155次