woodedit2.asp

来自「这是一个基于WEB的树木分类专家系统asp源代码,对于初学者特别有帮助!」· ASP 代码 · 共 35 行

ASP
35
字号
<%
Set conn = Server.CreateObject("ADODB.Connection")
    conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("tree.mdb")
treename = request.form("treename")
laname = request.form("laname")
xiongjing = request.form("xiongjing")
height = request.form("height")
age = request.form("age")

sql = "update 生长特征表1 set laname='"&laname&"',xiongjing='"&xiongjing&"',age='"&age&"' where treename='"&treename&"'"

on error resume next
  conn.Execute sql
  if err<>0 then
    response.write("No update permissions!")
  else 
    response.write("树木" &treename & " was updated!")
  end if 

%>
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>edit2</title>
</head>

<body>
</body>

</html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?