asp增加数据库表的字段代码
<%
'下面是最具技术含量的函数了，哈哈~
'增加数据库字段
function addziduan(ziduanming,ziduanleixing)
on error resume next
fldname = ziduanming
if ziduanleixing=1 or ziduanleixing=4 then
fldtype = "VarChar"
fldsize = 255
elseif ziduanleixing=2 or ziduanleixing=3 then
fldtype = "Text"
fldsize = ""
end if
fldnull = "ON"
fldautoincrement = ""
table_name = tables
if fldname <> "" and fldtype <> "" then
sql = "alter table [" & table_name & "] add ["&fldname&"] " & fldtype
if fldsize <> "" then
sql = sql & "(" & fldsize & ")"
end if
if fldnull <> "ON" then
sql = sql & " not null"
end if
conn.execute(sql)
if err <> 0 then
response.Write "<input type='button' name='ok' value=' 返 回 ' onClick='javascript:history.go(-1)'>"
end if
end if
end function
%>
相关文档：
'函数名：GetMyTimeNumber()
'作 用：生成时间的整数
'参 数：lx ---- 时间整数的类型
' lx=0 到分钟 lx=1 到小时 lx=2 到天 lx=3 到月
'返回值：生成时间的整数值(最小到分钟)
'示 例：
'********************************* ......
ASP的漏洞已经算很少的了，想要找到数据库的实际位置也不简单，但这不表明黑客无孔可入，也正是这个观点，一般的程序设计员常常忘记仔细的检查是否有漏洞，所以才有可能导致网站资料被窃取的事件发生。今天我在这里和大家谈谈ASP常见的安全漏洞，以引起大家的重视及采取有效的防范措施。(注意，在本文中所介绍的方法请� ......
1.记录集关闭之前再次打开:
------------------------------------
sql="select * from test"
rs.open sql,conn,1,1
if not rs.eof then
dim myName
myName=rs("name")
end if
sql="select * from myBook"
rs.open sql,conn,1,1
------------------------------------ ......
注：本人安装的是Windows 7 RC 7100 32位中文旗舰版 。
在Windows 7下面IIS7的安装方法：
一、进入Windows 7的 控制面板
，选择左侧的 打开或关闭Windows功能
。
二、现在出现了安装Windows功能的选项菜单
，注意选择的项目，我们需要手动选择
需要的功能，下面这张图片把需要安装的服务都已经选择了，大家可以按照 ......
conndb.asp
<%
Session.CodePage=65001
response.Charset="utf-8"
%>
<%
'数据库连接文件
dim conn
dim connstr
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+server.mappath("../date/#heihuhuhuajian.mdb")+";Jet OLEDB:Database Pass ......
