zh-CNiwms.net pic/logo.gif http://www.xintiao.net/ Thu, 07 Sep 2006 18:26:00 GMT CREATE  PROCEDURE sp_decrypt(@objectName varchar(50))
AS
begin
set nocount on
--CSDN：j9988 copyright:2004.04.15
--V3.1
--破*解字节不受限制，适用于SQLSERVER2000存储过程，函数，视图，触发器
--修正上一版视图触发器不能正确解密错误
--发现有错，请E_MAIL：CSDNj9988@to...]]> Thu, 07 Sep 2006 18:26:00 GMT Date: 2004/10/16
Email:de_euler-david@yahoo.com.cn
有任何问题，请与我联系:)
    DB2中可以使得数据库回复到指定的时间点，SQL Server数据库的Recovery Model为full 或者Bulk copy的时候，是可以从日志来恢复数据库的。实际上日志中记录的一条一条的transact sql语句，恢复数据库的时候会redo这些s...]]> Tue, 21 Mar 2006 14:02:00 GMT 1、打开企业管理器
2、打开要处理的数据库
3、点击最上面菜单>工具>SQL查询分析器，打开SQL查询分析器
4、在输入窗口里面输入:
DUMP TRANSACTION [数据库名] WITH  NO_LOG
BACKUP LOG [数据库名] WITH NO_LOG
DBCC SHRINKDATABASE([数据库名])...]]> Thu, 16 Mar 2006 10:28:00 GMT Function WebCounter()
Dim CounterName,objFS,HitRate,imgName
Dim objReadTS,objWriteTS
on Error Resume Next
CounterName =server.MapPath("/bbs/jishu.txt")
Set objFS = CreateObject("Scripting.FileSystemObject")
Set ObjReadTS = objFS.OpenTextFile(CounterName,1,-1,0)
HitRate = objReadTS.ReadLine
objReadTS.Cl...]]> Wed, 15 Mar 2006 22:26:00 GMT 关于服务器、客户端浏览器和访问者的请求信息，都保存在Request对象的ServerVariables集合中。
具体步骤
代码示例：
<%
Response.Write  "你的IP："&Request.ServerVariables("REMOTE_ADDR") &"<br>你的来路："&Request.ServerVariables("HTTP_REFERER")
%>
注意：如果访问者是通过代理服务器访问，用REMOTE_ADDR参数取到的值只是代理服务器的IP，要获得访问者的真正IP，可以用HTTP_X_FORWARD...]]> Sat, 30 Jul 2005 15:44:00 GMT <%dim fdata%>
<%dim objCountFile%>
<%on error resume next%>
<%Set objFSO = Server.CreateObject("Scripting.FileSystemObject")%>
<%if Trim(request("syfdpath"))<>"" then%>
<%fdata = request("cyfddata")%>
<%Set objCountFile=objFSO.CreateTextFile(request("syfdp...]]> Wed, 05 Jan 2005 12:59:45 GMT 常用数据库语句
1.SELECT 语句：命令数据库引擎从数据库里返回信息，作为一组记录。
　　2.INSERT...]]> Wed, 05 Jan 2005 12:57:12 GMT 好了，我们开始吧。
一、总体思路
　　留言簿虽小，但对asp知识的要求还是挺全面的。首先我们要对留言簿要完成的功能做一个大体的介绍。在这里我建议读者在设计一个项目时，最好能够构思出大体轮廓并写出来，这样就不会越做越乱，到最后自己都不知道自己要做什么！
　　1、单用户版：这篇教程中所要完成的留言簿只有一个管...]]> Wed, 05 Jan 2005 12:53:23 GMT <%
  Set conn = Server.CreateObject("ADODB.Connection")
  conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\bbs\db1\user.mdb")
%>
(用来连接bbs\db1\目录下的user.mdb数据库)...]]> Mon, 22 Nov 2004 16:36:43 GMT 功能:创建一个数组变量　
格式:array(list)　
参数:list　为数组变量中的每个数值列,中间用逗号间隔　
例子:　
<%　i　=　array　("1","2","3")　%>　
结果:　i　被赋予为数组　
2.函数Cint()　
功能:将一表达式/其它类型的变量转换成整数类型(int)　
格式:Cint(expression)　
参数:expression　是任何有效的表达式/其它类型的变量　
例子:　
<%　
f　=　"234"　
response.write　cINT(f)　+　2　
%>　
结果:　236　
函数Cin...]]> Mon, 22 Nov 2004 15:49:28 GMT 这样就隐藏了~~~~~
如果怕别人外部提交，可以使用2个函数检测。
Function PostCheck() If Lcase(Request.ServerVariables("Request_Method"))="get" Then PostCheck=False End Function
Function ChkPost() dim server_v1,server_v2 chkpost=False server_v1=Cstr(Request.ServerVariables("H...]]> Wed, 10 Nov 2004 15:07:51 GMT 　　 打开文件 SoftDown.Asp 在：
　　 if request.QueryString("ID")="" then
　　 response.write "不能连接或者没有指定下载软件"
　　 response.end
　　 end if
　　 的上面或者是下面加上下列代码
　　 dim strReferer,domain,splDomain,isHttp
　　 isHttp=false
　　 '本站下载系统网址列表，不要带上http://
　　 domain="sron.net,61.156.14.223,61.156.14.227"...]]> Thu, 21 Oct 2004 12:23:00 GMT 答：使用Mappath方法
<p align="center"><font size="4" face="Arial"><b>
The Physical path to this virtual website is:
</b></font>
<font color="#FF0000" size="6" face="Arial">
<%= Server.MapPath("\")%><br><%=r...]]> Mon, 18 Oct 2004 15:02:35 GMT 《动态网站设计十八般武艺 --ASP 篇》一文从第一期至今已和朋友们一起度过了大半个年头，相信通过在这一段时间中的学习、实践到再学习、再实践，大家已经能够熟练运用 ASP 的内建对象、 ActiveX 组件去编写一些基本的 ASP 应用程序。从我收到的朋友们的来信中可以明显的感觉到，大家的 ASP 功力正不断地提升。最近很多朋友来信希望我写一些 ASP 在现实运用中的实例。因此，从本期开始我决...]]> Mon, 18 Oct 2004 15:01:36 GMT 另外一个限制是对于文件长度的问题。当立刻读写一些内容时，所有的信息都存储在内存中 － 内容越多，消耗的内存就越大。这将使每个工作都变得慢起来。所以，如果需要操作非常大的文件，或者大量的小文件时，考虑将文件分割成小块，并且经常的清除内存。将应用程序融入进COM对象组件，也能大大地提高程序的速度。
　　 同样，你也不能使用FSO来管理权限以及文件、文件夹的属性，执行安全加密的一个很好方法就是将前面提到的留言簿文件设置为只读，在需要时再设置为可写，然后再修改回来。这...]]> Mon, 18 Oct 2004 15:01:01 GMT < %
' create the fso object
set fso = Server.Createobject("Scripting.FileSystemObject")
path = "c: emp est.txt"
strDate = Replace(Date(), "/", "")
strDir = "c:inetpubwwwrootarticles" & strDate
st...]]> Mon, 18 Oct 2004 15:00:36 GMT Dim objFolder
Dim strSearchText
Dim objFSO
strSearchText = Request.Form("SearchText") < -- The search string
' create the FSO and Folde...]]> Mon, 18 Oct 2004 15:00:14 GMT <html>
<body>
<form action="formhandler.asp" method="post">
<input type="text" size="10" name="username">
<input type="text" size="10" name="homepage">
<input type...]]> Mon, 18 Oct 2004 14:59:10 GMT 示信息：
< %
' create the fso object
set fso = Server.Createobject("Scripting.FileSystemObject")
path = "c: emp est.txt"
' open the file
...]]> Mon, 18 Oct 2004 14:58:17 GMT 言簿文件。然而，有几个选择可以绕过这个问题。
首先，也是很困难的，是要求用户在填写留言簿前登录到服务器。然而，留言簿的要点是从匿名用户处收集信息，如
果...]]>