updatesubcat.asp

这是一个用SQL Server和ASP开发的搜索引擎网站

<%
cat= replace(Request.Form("newcat"),"'", "''")
catid = Request.Form("catid")
Conn_String ="Provider=sqloledb;" & "Data Source=127.0.0.1;Initial Catalog=qiye_8;User Id=sa;Password=password;"  
set conn = Server.CreateObject("ADODB.Connection")
conn.open Conn_String
 conn.Execute("UPDATE subcat  set subCatname='" & cat & "' where subcatID=" & catid)	
conn.Close
set conn = nothing
Response.write "子类别已更新"
%>