×

Loading...
Ad by
  • 推荐 OXIO 加拿大高速网络，最低月费仅$40. 使用推荐码 RCR37MB 可获得一个月的免费服务
Ad by
  • 推荐 OXIO 加拿大高速网络，最低月费仅$40. 使用推荐码 RCR37MB 可获得一个月的免费服务

@Calgary

I made a sample for you, good luck.

gamma(gamma)
<% @LANGUAGE = VBScript %>
<%Option Explicit%>
dim objConn, strSQL, value1, value2, value3, totalvalue
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Provider = "Microsoft.Jet.OLEDB.4.0"
objConn.Open "yourpath\yourdatabase.mdb"

value1 = trim(Request.Form("data1"))
value2 = trim(Request.Form("data2"))
value3 = trim(Request.Form("data3"))
totalvalue = value1 + value2 + value3

strSQL = "Insert into yourtable (value1, value2, value3, totalvalue) values (" & value1 & "," & value2 & "," & value3 & "," & totalvalue & ")"
objConn.Execute strSQL

<html>
<head>
<title>collect form data</title>
</head>
<body>
<form name="form1" action="<%=Request.ServerVariables("SCRIPT_NAME")%>" method="post">
<input type="text" name="data1">
<input type="text" name="data2">
<input type="text" name="data3">
<input type="submit" name="Submit" value="Submit">
</form>
</body>
</html>
(#569122@0)
Last Updated: 2002-6-10
This post has been archived. It cannot be replied.
Report

Replies, comments and Discussions:

  • 工作学习 / IT技术讨论 / Web page 高手give me a hand please. -waokool(waokool); 2002-6-10 {182} (#568469@0)
    我正在用frontpage 2000 做网页。原来有个send to databse option 可以用，但不知何故，今天死活不能用了。send to database在insert得下拉菜单里，现在一直是灰的，急死我了，请帮帮我，多谢了。
    • Web page 高手用frontpage 2000 地估计不多。你还不如说你想干什么，说不准一堆code就给你了。 -guestagain(guest again); 2002-6-10 (#568518@0)
      • 我想把form 里的输入值自动送到Access database.give me a hand, Thanks a lot alot alot. -waokool(waokool); 2002-6-10 (#568788@0)
      • 我还想把form 的值（很多）加起来，却不知如何做，帮帮忙。我是菜菜鸟，不好意思。 -waokool(waokool); 2002-6-10 (#568795@0)
    • 装了ODBC了吗？ -wooway(wooway); 2002-6-10 {14} (#568550@0)
      其实我也不懂。
    • I made a sample for you, good luck. -gamma(gamma); 2002-6-10 {959} (#569122@0)
      <% @LANGUAGE = VBScript %>
      <%Option Explicit%>
      dim objConn, strSQL, value1, value2, value3, totalvalue
      Set objConn = Server.CreateObject("ADODB.Connection")
      objConn.Provider = "Microsoft.Jet.OLEDB.4.0"
      objConn.Open "yourpath\yourdatabase.mdb"

      value1 = trim(Request.Form("data1"))
      value2 = trim(Request.Form("data2"))
      value3 = trim(Request.Form("data3"))
      totalvalue = value1 + value2 + value3

      strSQL = "Insert into yourtable (value1, value2, value3, totalvalue) values (" & value1 & "," & value2 & "," & value3 & "," & totalvalue & ")"
      objConn.Execute strSQL

      <html>
      <head>
      <title>collect form data</title>
      </head>
      <body>
      <form name="form1" action="<%=Request.ServerVariables("SCRIPT_NAME")%>" method="post">
      <input type="text" name="data1">
      <input type="text" name="data2">
      <input type="text" name="data3">
      <input type="submit" name="Submit" value="Submit">
      </form>
      </body>
      </html>
      • Thank you so much, gamma. You are really a GAO Shou. -waokool(waokool); 2002-6-10 (#569258@0)
        • you are welcome :)) Try to give up frontpage if you want to be a good web programmer. -gamma(gamma); 2002-6-10 (#569266@0)
          • I agree with u, but I regard Frontpage as an edit tool, its interface is good to use, I mean it better than text editor. Anyway, I stil hope you can give me some advice in future. Thank you very much. -waokool(waokool); 2002-6-10 (#569293@0)

More Topics

  • 现在社区游泳池招救生员巡逻，过一会还要不停的点人头，这工作是否很快就被AI代替了，装一个摄像头后面是AI处理系统，这样只招一个等着救人就行了，人头沉下水一定时间立马强光照射，还可以分析水下人的状况来判断是否溺水等
  • 新冠疫苗引发心肌炎? 最新研究这样看
  • 这道几何题有解吗?
  • SAM 2 Demo
  • 如何在 AWS EC2 实例上构建 WordPress 应用程序?
    • 枫下论坛主坛 /  工作学习 /  IT技术讨论