下面是我的一些代码。请大家帮忙修改。
连接数据库的页面conn.asp
代码如下：
<%
Set conn = Server.CreateObject("ADODB.Connection")
Strconn="DRIVER={Microsoft Access Driver (*.mdb)}; "
Strconn=Strconn & "DBQ=" & Server.MapPath("rck.mdb")
conn.Open Strconn
%>
用户填写的界面文件jiegou.asp
代码如下：
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>无标题文档</title>
</head>
<body>
<p align="center">数据库表结构修改页面</p>
<form id="form1" name="form1" method="post" action="biaojiegou.asp">
需要添加的字段名：
<label>
<input type="text" name="ziduan" id="ziduan" />
</label>
字段类型：
<label>
<input type="text" name="leixing" id="leixing" />
</label>
<p>
<label>
<input type="submit" name="button" id="button" value="提交" />
</label>
<label>
<input type="reset" name="button2" id="button2" value="取消" />
</label>
</p>
</form>
</body>
</html>
提交转向处理的页面biaojiegou.asp
代码如下：
<%
response.Buffer = true
dim ziduan
ziduan=trim(request.Form("ziduan"))
sql="alter table ybqh add= '"&ziduan&"'"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,Strconn,1,3
rs.close
set rs=nothing
set Strconn=nothing
conn.close
response.Redirect"index.asp"
%>
现在问题就是这个处理页面上的具体的向access数据库表写入字段的代码不知道如何写，请各位csdn的朋友帮帮忙！谢谢了！
