1、在数据库里定义一个保存当前时间的字段，不要和一些关键字同名（如time）。
2、设两个变量来或取日期和时间，
如:date1
=
date(now)
time1
=
time(now)
shijian
=
date1
+
time1
3、把时间写入数据库
您好，代码如下：第一个页面，命名如：add.asp，代码内容（实际上是html页）：
<html>
<head>
<title>提交页面</title>
</head>
<body>
<form action="addsave.asp" method="post" name="add">
<table width="450" border="0" align="center" cellpadding="2" cellspacing="0">
<tr>
<td height="40" colspan="2" align="center"><span class="text3"><strong>填写</strong></span></td>
</tr>
<tr>
<td width="124"><P style="MARGIN-TOP: 2pxMARGIN-LEFT: 80px">姓名</p></td>
<td width="318"><input name="name" type="text" id="name"></td>
</tr>
<tr align="center">
<td colspan="2"><input type="submit" name="Submit" value="提交">
<input type="reset" name="Submit" value="重填"></td>
</tr>
</table>
</form>
</body>
</html>
----------------------------------
第二个页面，叫addsave.asp，代码内容：
<%@LANGUAGE="VBScript" codepage="936"%>
<%
set conn=server.createobject("adodb.connection")
connstr="Provider=Microsoft.jet.oledb.4.0data source="&server.mappath("db1.mdb")
conn.open connstr
%>
<%
set rs=server.createobject("adodb.recordset")
sql="select name from 1"
rs.open sql,conn,1,3
rs.addnew
name=request.form("name")
rs("name")=name
rs.update
rs.close
set rs=nothing
conn.close
set rs=nothing
%>
OleDbConnection conn = new OleDbConnection()conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0Data Source=|DataDirectory|db1.mdb"
OleDbCommand comm = new OleDbCommand()
conn.Open()
comm.Connection = conn
comm.CommandText = "Insert Into [Time] ([begin],[over]，[name]) Values (@begin,@over,@name)"
comm.Parameters.AddWithValue("@begin", a)
comm.Parameters.AddWithValue("@over", b)
comm.Parameters.AddWithValue("@name", c)
comm.ExecuteNonQuery()
conn.Close()
注意：
1、以上代码是以access数据为例。
2、如果表里面有其他不能为空的字段存在，需要给他们提供值，自动增加的字段除外。
3、db1.mdb文件的只读属性去掉，在文件的属性-安全性里面，添加 everyone帐号和NETWORK Service 帐号可修改权限。
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）