<%if session("username")="" then%>
<%end if%>
<%
if request("action")="del_one" then
openconn
set rs=server.CreateObject("adodb.recordset")
sql="delete from tblvideo Where idvideo='"&replace(Request.QueryString("nid"),"'","''")&"'"
Conn.execute (sql)
Response.Redirect("?hbxb=26&Quan-ly-video.html")
end if%>
<%
if request("action")="submit" then
names=replace(request("names"),"'","''")
pathanh=replace(request("pathanh"),"'","''")
thutu=replace(request("thutu"),"'","''")
openconn
set rs=server.CreateObject("adodb.recordset")
sql="insert into tblvideo(name,link,thutu) values(N'"&names&"','"&pathanh&"','"&thutu&"')"
conn.execute(sql)
response.Redirect("?hbxb=26&Quan-ly-video.html")
%>
<%end if%>