--热熔胶行业网址大全

<% Dim strID,strSort strSort="gqxx" strID=trim(Request.QueryString("mID")) strSql="select * from tb_"&strSort&" where id="&strID set rs=server.CreateObject("ADODB.Recordset") rs.open strSql,conn,1,1 conn.execute("update tb_"&strSort&" set A6=A6+1 where id="&strID) %> --热熔胶行业网址大全