当前位置：首页 → 问答吧 → 新手求助简单问题数据库插数据

新手求助简单问题数据库插数据

时间：2011-09-02

来源：互联网

Assembly code

<!--#INCLUDE FILE="../HXINCLUDE/HXINCLUDEHEAD.ASP"-->
<!--#INCLUDE FILE="../HXINCLUDE/SelectDate.ASP"-->
<%if WS_S.MemberPriv("WS_SaleManageCustomContactManage")<>1 then HX_GoBack "对不起,您的权限不够!",""
'定义sql的几个参数：columnName=列名的列表，为空时相当于* :Tablename=表名，可以复合 Orderby=where条件和排序语句
'HX_SetRSD函数里面SQLString=SELECT :columnName FROM :Tablename :Orderby
%>
<HTML>
 <HEAD>
  <TITLE>  </TITLE>
  <META NAME="Generator" CONTENT="EditPlus">
  <META NAME="Author" CONTENT="">
  <META NAME="Keywords" CONTENT="">
  <META NAME="Description" CONTENT="">
 </HEAD>

 <BODY>

</head>
<body>

<form>
<%
Dim table
table=request("txt")
response.write(table)
%>
<%
Dim sum
response.write("总金额：")
sum=request("tt")
response.write(sum)
%>
<input type="submit" name="submit" value="确定">
</form>

 </BODY>
</HTML>

怎样将我得到的table和sum这两个变量插入到数据库中，access中table对应的应该字段是备注类型，sum是货币类型！

作者: yuncha299792458 发布时间: 2011-09-02

<%
if request.QueryString("action")=add then
sql="select table,sum from 表"
rs("table")=table
rs("sum")=sum
rs.update
end if
%>
<form action="?action=add" method="post">
<%
Dim table
table=request("txt")
response.write(table)
%>
<%
Dim sum
response.write("总金额：")
sum=request("tt")
response.write(sum)
%>
<input type="submit" name="submit" value="确定">
</form>

作者: qishaoyeyyy 发布时间: 2011-09-02