通用修改和增加函数【ASP】
一般来说编数据库类的程序主要要解决的问题无非是添加，删除，修改和查询。这类编程都非常的简单。接下来我利用一点空余时间发一个函数里面包含和添加和删除功能。实验的架构可以使用IIS.5WEB服务器ACCESS数据库。这个我其实不用说的很详细了，因为大家都应该知道的。我就直接把函数贴出来。大家只要稍微修改即可使用。
<%
sub AdminEdit()
dim Action,rsCheckAdd,rs,sql
Action=request.QueryString("Action")
if Action="SaveEdit" then '保存编辑管理员信息
set rs = server.createobject("adodb.recordset")
if Result="Add" then '创建网站管理员
set rsCheckAdd = conn.execute("select AdminName from Ameav_Admin where AdminName='" & trim(Request.Form("AdminName")) & "'")
if not (rsCheckAdd.bof and rsCheckAdd.eof) then '判断此管理员名是否存在
response.write "<mce:script language=javascript><!--
alert('" & trim(Request.Form("AdminName")) & "管理员已经存在，请换一个登录名再试试！');history.back(-1);
// --></mce:script>"
response.end
end if
sql="select * from Ameav_Admin"
rs.open sql,conn,1,3
rs.addnew
if len(trim(Request.Form("AdminName")))<3 or len(trim(Request.Form("Password")))>10 then
response.write "<mce:script language=javascript><!--
alert('管理员登录名必填，且字符数为3-10位！');history.back(-1);
// --></mce:script>"
response.end
end if
if len(trim(Request.Form("Password")))<6 or len(trim(Request.Form("Password")))>16 then
response.write "<mce:script language=javascript><!--
alert('管理员密码必填，且字符数为6-16位！');history.back(-1);
// --></mce:script>"
response.end
end if
if Request.Form("Password")<>Request.Form("vPassword") then
response.write "<mce:script language=javascript><!--
alert('两次输入的密码不一样！');history.back(-1);
// --></mce:script>"
response.end
end if
rs("AdminN
相关文档：
<%
Set rs=Server.CreateObject("ADODB.RecordSet")
sql="select * from 0791idc_News where BigClassName='家装课堂' order by ID desc"
rs.Open sql,Conn,1,1
if rs.eof and rs.bof then
response.Write("暂时没有记录")
else
%>
......
<%
for i=1 to rs.recordCount '变量i从1循环到数据库中的全部记录数
if (i mod 1 =1) then '每个tr即每行显示1个记录,可根据需要自行修改, 将左边的1修改为2即显示两行。
response.write "<tr align='center'>"
end if
%>
此处为要循环的内容
<%if (i mod 1 = 0) then ......
添加、删除、修改使用
db.Execute(Sql)命令执行操作
╔----------------╗
☆ 数据记录筛选 ☆
╚----------------╝
注意：单双引号的用法可能有误(没有测式)
Sql = "Select
Distinct
字段名 from 数据表"
Distinct函数，查询数据库存表内不重复的记录
......
+++ ASP.NET缓存中的数据是不稳定的，不会被永久地存储，可能会由于以下原因之一而从缓存中被自动移除：
1) 缓存满了
2) 缓存项已经过期
3) 缓存依赖的项改变了
+++ 除了可以自动移除缓存项外，你可以显示移除缓存项。另外，当你用Insert方法和Add方法向缓存中添加的缓存项已经存在时，那么，原来的缓存项将被自动删除� ......
最近写站内搜索，所以研究了一下算法，该算法的原理如图显示。
以下是一个用asp写的简单的分词程序主要的代码，词库我已经用access建立好了。
如果要注重效率，MarLen的选取很是重要，否则效率会十分低下，这里MarLen我选取的是5。
dim faword : faword = ""
do while (len(fword) > 0)
tword = left(fwor ......
