求一个asp+sql2000的小程序,比如在一个html界面上输入一个数据,然后就能添加到数据库里
要完全代码啊,本人是小白,请见谅,本人暂不会修改,感兴趣想学习。代码说明不用写的,但是在电脑上实现的步骤也写上,比如,这些文件放到说明路径,odbc源的设置等,也可以发邮...
要完全代码啊,本人是小白,请见谅,本人暂不会修改,感兴趣想学习。代码说明不用写的,但是在电脑上实现的步骤也写上,比如,这些文件放到说明路径,odbc源的设置等,也可以发邮箱:shmyangle8677@163.com
展开
展开全部
function CreateDBcn(byref cn)
on error resume next
CreateDBcn=true
set cn=server.CreateObject("adodb.connection")
cn.Open "Provider=SQLOLEDB;Server=127.0.0.1;database=数据库名;uid=sa;pwd=000000"
if Err.number>0 then CreateDBcn=false
end function
页面
<form method="post" name="f" id="f" action="?do=add">
<input type="text" name="aa" id="aa" />
<input type="submit" name="s" id="s" value="提交" />
</form>
<%
if request("do")="add" then
CreateDBCn cn
cn.execute("insert into 数据表名(字段1,字段2) values(值1,值2)")
end if
%>
on error resume next
CreateDBcn=true
set cn=server.CreateObject("adodb.connection")
cn.Open "Provider=SQLOLEDB;Server=127.0.0.1;database=数据库名;uid=sa;pwd=000000"
if Err.number>0 then CreateDBcn=false
end function
页面
<form method="post" name="f" id="f" action="?do=add">
<input type="text" name="aa" id="aa" />
<input type="submit" name="s" id="s" value="提交" />
</form>
<%
if request("do")="add" then
CreateDBCn cn
cn.execute("insert into 数据表名(字段1,字段2) values(值1,值2)")
end if
%>
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询