⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 savenewsadd1.asp

📁 人民医院眼科全站
💻 ASP
字号:
<!-- #include file="../include/bkconn.asp"-->
<!--#INCLUDE FILE="../include/upload.asp"-->
<!--#include file="checkUser.asp"-->
<%
	sql = "SELECT top 1 * FROM news order by id desc"
	set rs=conn.execute(sql)
	if not rs.eof then
		id=rs("id")+1
	else
		id=1
	end if
	set rs=nothing

	set upload=new upload_5xSoft
       Set cmdTemp = Server.CreateObject("ADODB.Command")
       Set InsertCursor = Server.CreateObject("ADODB.Recordset")
       cmdTemp.CommandText = "SELECT top 1 * FROM news order by id desc"
       cmdTemp.CommandType = 1
       Set cmdTemp.ActiveConnection = conn
       InsertCursor.Open cmdTemp, , 1, 3
       InsertCursor.addnew  
	 
	if upload.form("Sort")<>"" then
       InsertCursor("newsSort") =upload.form("Sort")
	end if
    if upload.form("Sort1")<>"" then
	   InsertCursor("Sort1") =upload.form("Sort1")
	   end if
    if upload.form("title")<>"" then
	   InsertCursor("title") =upload.form("title")
	 end if
	 if upload.form("content")<>"" then
       InsertCursor("content") =upload.form("content")
	   end if
	   InsertCursor.Update

%>
	<script language=Javascript>
	<!--
	alert("添加成功!");
	window.location="newsAdd1.asp?newsSort=<%=upload.form("Sort")%>"
	-->
	</script>
<%
	   InsertCursor.close
	   conn.close
       set InsertCursor=nothing
       set conn=nothing
%>

⌨️ 快捷键说明

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