收录日期:2019/03/19 04:31:04 时间:2016/05/18 03:14:04 标签:ASP
我想做一个插入数据的页面,例如插入个人信息。
如果可以的话,请附上源代码。
Set conn=Server.CreateObject("ADODB.Connection")
  Set rs=Server.CreateObject("ADODB.RecordSet")
  data="driver={sql server};database=dbsheji;server=tianlei;uid=tl;pwd=005"
  conn.open data
sql="select * from 图书信息表 where bookid='"&bookid&"'"
     rs.open sql,conn,2,3
     if rs.eof and rs.bof then
       rs.addnew
      rs("bookid")=bookid
      rs("bookname")=bookname
      rs("bookkind")=bookkind
      rs("author")=author
      rs("price")=price
      rs("publisher")=publisher
      rs("publishtime")=publishtime 
      rs("entertime")=entertime
      rs("totalnum")=totalnum
      rs("remainnum")=totalnum
      rs("remark")=remark  
      rs.update
这样可以插入一条记录!
// conn.asp
    <%
  Set conn = Server.CreateObject("ADODB.Connection") 
  conn.open="driver={sql    server};server=;uid=sa;pwd=;database=book_pub"
%>

// 使用author table
// 提交叶面
   <!--#include file="../conn.asp"-->
<body>
<form name="form1" method="post" action="保存叶面">
  <table width="200" border="1" align="center" cellpadding="0" cellspacing="0">
    <tr> 
      <td height="26" colspan="2">
<div align="center"><font color=red><%=name%></font>的详细信息</div></td>
    </tr>
    <tr> <td width="200">姓名<input name="name1"  type="text" id="name1" size="8" ></td></tr>     
    <tr><td width="200">性别 <select name="sex"  id="sex"><option value="男"></option><option value="女"></option></select></td>
    </tr> 
<tr> <td width="200">学历
     <select name="grade"  id="grade">
          <option value="高中"></option>
          <option value="本科"></option>
          <option value="本科以上"></option>
          <option value="专科"></option>
        </select></td></tr>

<input type="hidden" name="id" value="<%rs(0)%>">
<tr> <td width="200">工作单位 <input name="company" id="company" type="text" size="30"></td></tr>
<tr> <td width="200">电子信箱 <input name="email" id="email" type="text" size="30"></td></tr>
<tr> <td width="200">简介 <textarea name="intro" rows="15" id="intro" cols="60"><%=rs(9)%></textarea></td></tr>
    <tr> 
      <td height="20" colspan="8"><div align="center"> 
            <input type="submit" name="Submit" value="提交">
            <input type="reset" name="Submit2" value="重置">
       </div></td>
    </tr>
  </table>
</form>

// 保存叶面
   <!--#include file="../conn.asp"-->
id=request("id")
name1=request("name1")
sex=request("sex")
grade=request("grade")
company=request("company")
address=request("address")
email=request("email")
intro=request("intro")
sql=" insert into book_autor(name,sex,grade,company,address,email,intro) values('"&name1&"','"&sex&"','"&grade&"','"&company&"','"&address&"','"&email&"','"&intro&"')"
conn.execute(sql)
// 叶面返回
<script language="JavaScript">
 history.go(-2);
</script>
<%
SQL语句是差不多的,只不过在连接数据库时是连接数据库服务器,不象access数据库直连中是直连文件,它要指定驱动程序,用户帐号和密码
还有一种方法,就是使用数据源,就不用管是什么数据库了,只要连接数据源,再创建记录集,再用SQL语句操作就是了,根本不用管是什么数据库!

rmic怎么老是提示:Class com.deitel.advjhtp1.rmi.weather.WeatherServiceImpl not found. 女朋友不幸怀孕 忘有经验者帮忙 我想把表单里的数据用邮件发送,但是…… 我想知道北大青鸟的那个培训。。。。。? 数据的存储与显示问题???请各位帮忙,不胜感激!! 如果查询的结果只有一条记录,可不可以这样直接付给一个变量 大家怎么看java国际认证~~急等~~谢谢大家了 response的问题 clientsocket\\serversocket的使用 遇到trim不能去掉的空格,各位还有办法吗?在线等待! 求助 unicode编码 新配的机器运行有些程序退出后,进程中还存在,而且占用100%的cpu,只有手动结束后,占用率自动下降 switch 问题 --->> 真的sql6.5的数据不能倒入sql7.0吗? 系列化和反系列化 我在客户端用了owc组件,如何在用户进入页面时,提示并且自动从服务器安装这些组件呢? 请问哪里有VFP7.0或8.0安装程序? 高分问题:存在性查询,sql高手回答? 新手请教 怎么加自己写的控件并且调用控件里的函数? 大家请帮忙看看这段代码(非常简单) 关于宏调用的问题,急,送100分 VC下,使用ADO,如何将XML文件的信息读到记录集中(RecordSet)? 请教win2000与linux双系统怎么装 如何判断外部对象是否有效? c和c++ 的兼容问题,高分请高手帮忙!(在线等待……) 如何在程序中自动发送邮件? 屏蔽系统功能键 各位都来发表一下..... c和c++ 的兼容问题,高分请高手帮忙!(在线等待……)