<%@ LANGUAGE="VBSCRIPT" %> <% DbPath = SERVER.MapPath("../database/topboy-2002.mdb") Set conn = Server.CreateObject("ADODB.Connection") conn.open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DbPath %> <% If request("imageadd.x") <> "" Then if isnumeric(request("price")) = false or isnumeric(request("iprice")) = false or isnumeric(request("freight")) = false then response.write"" Response.write " 您好,价格请您填写数字!" Response.write "请按此返回..." Response.end end if sql="insert into topboy_product (productname,price,iprice,freight) values('"& trim(request("productname")) &"','"& request("price") &"','"& request("iprice") &"','"& request("freight") &"')" conn.execute sql response.redirect "manager-product-list.asp" response.end end if %>
录入商品

商品名称 :
零售价 : ¥ 元
批发价 : ¥ 元
运费 : ¥ 元