<%
if session("admin")="" then
Response.Redirect("index.asp?err=4")
end if
%>
<%
id=request.QueryString("id")
function getMenu()
set rsMenu=server.CreateObject("adodb.recordset")
sqlMenu="select * from [videotype]"
rsMenu.open sqlMenu,conn,1,1
do while not rsMenu.eof
%>
<%
rsMenu.movenext
loop
rsMenu.close
end function
function getMenuName(menuid)
set rsMenuName=server.CreateObject("adodb.recordset")
sqlMenuName="select [name] from [videotype] where [id]="&menuid
rsMenuName.open sqlMenuName,conn,1,1
if not rsMenuName.eof or rsMenuName.bof then
getMenuName=rsmenuName(0)
end if
rsMenuName.close
end function
if request.QueryString("type")="update" then
set rsUpdate=server.CreateObject("adodb.recordset")
sqlUpdate="select * from [video] where [id]="&request.QueryString("id")
rsUpdate.open sqlUpdate,conn,1,3
'rsUpdate.update
rsUpdate("title")=trim(request.Form("title"))
rsUpdate("menu")=trim(request.Form("menu"))
rsUpdate("imgFull")=trim(request.Form("imgFull"))
rsUpdate("videoFull")=trim(request.Form("videoFull"))
rsUpdate("content")=trim(request.Form("content"))
rsUpdate("xuhao")=trim(request.Form("xuhao"))
rsUpdate("online")=request.Form("online")
rsUpdate.update
rsUpdate.close
response.Redirect("?type=ok&id="&request.QueryString("id"))
end if
set rs=server.CreateObject("adodb.recordset")
sql="select * from [video] where [id]="&id
rs.open sql,conn,1,1
%>
<%=rs("title")%> 视频添加