家庭/个人应用

开发平台：
ASP/ASPX

tvedit.asp：源码内容
							<STYLE type=text/css>
.boxttt {
	BORDER-RIGHT: #b5b385 1px solid; BORDER-TOP: #4a492d 1px solid; FONT-SIZE: 12px; BACKGROUND: #939059; BORDER-LEFT: #4a492d 1px solid; COLOR: #333333; BORDER-BOTTOM: #b5b385 1px solid
}
.boxttx {
	BORDER-RIGHT: #4a492d 1px solid; BORDER-TOP: #b5b385 1px solid; FONT-SIZE: 12px; BACKGROUND: #a8a66f; BORDER-LEFT: #b5b385 1px solid; COLOR: #ffffff; PADDING-TOP: 1px; BORDER-BOTTOM: #4a492d 1px solid; HEIGHT: 18px
}
</STYLE><!--#include file="../inc/function.asp"-->
<!--#include file="../security.asp"-->
<!--#include file="tvconn.asp"-->
<!--#include file="../../checkpost.asp"-->
<%if session("flag")>1 then
    response.write "<script>alert('您的操作权限不够！');history.back();</script>"
    response.end
end if
%>
<%
Set rs = Server.CreateObject("ADODB.Recordset")
function HTMLEncode(fString)
    fString = replace(fString, ">", "&gt;")
    fString = replace(fString, "<", "&lt;")
    HTMLEncode = fString
end function
%>
<%
if request("okok")="修改" then
f_name=request("f_name")
f_position=request("f_position")
tvtype=request("tvtype")
f_url=request("f_url")
f_maker=request("f_maker")
f_img=request("f_img")
f_keyword=request("f_keyword")
f_alt=request("f_alt")
f_link=request("f_link")
dbid=request("id")
sql="select * from jsfiles where id="&dbid
rs.open sql,conn,1,3
rs("f_name")=f_name
rs("f_position")=f_position
rs("tvtype")=tvtype
rs("f_url")=f_url
rs("f_maker")=f_maker
rs("f_kmg")=f_kmg
rs("f_img")=f_img
rs("f_keyword")=f_keyword
rs("f_alt")=f_alt
rs("f_link")=f_link
rs("f_edate")=now
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
response.write "<script language='javascript'>" & chr(13)
response.write "alert('编辑成功');"&Chr(13)
response.write "window.location='tvinfo.asp?id="&dbid&"';"&Chr(13)
response.write "</script>" & Chr(13)
Response.End
End if
dbid=request("id")
sql="select * from jsfiles where ID="&dbid
rs.open sql,conn,1,3
%>
<link rel="stylesheet" type="text/css" href="../inc/Admin_STYLE.CSS">
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>编辑文件</title>
<link rel="stylesheet" type="text/css" href="images/test.css">
<style>
td{padding:2}
body {
	background-color: #FFFFFF;
}
.样式1 {
	color: #000000;
	font-weight: bold;
}
</style>
</head>
<body>
<p align="center">&nbsp;</p>
<form method="POST" action="tvedit.asp?id=<%=rs("id")%>" name="form">
  <div align="center">
  <center>
<table class="border" width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr class="title">
<tr bgcolor="#eeeeee">
  <td height="22" colspan="2" align="right" class="title"><div align="center" class="样式1">修改直播地址</div></td>
  </tr>
<tr class="tdbg">
  <td width="82" align="right">名　称：</td>
  <td width="468" height="40"><input type="text" name="f_name" size="39" value='<%=rs("f_name")%>'></td>
</tr>
<tr class="tdbg">
  <td width="82" align="right">类 别：</td>
  <td width="468" height="40"><select size="1" name="f_position">
<option value="1">选择目录</option>
<%
Set rsfolder = Conn.Execute("Select * from jsfolder order by id")
%>
<% While rsfolder.EOF =flase %> 
<option value="<%=rsfolder("id")%>" <%if  rsfolder("id")=rs("f_position") then Response.Write "selected" %>><%=rsfolder("js_fname")%></option>
<% rsfolder.MoveNext
Wend %>
<% 
rsfolder.close 
Set rsfolder=nothing 
%> 
</select></td>
</tr>
<tr class="tdbg">
  <td align="right"><span class="style1">播放类别：</span></td>
  <td height="40"><select name="tvtype" id="tvtype">
    <option selected><%=rs("tvtype")%></option>
	<option>选择格式</option>
    <option value="rm">rm格式</option>
    <option value="ms">ms格式</option>
    <option value="html">html格式</option>
    </select></td>
</tr>
<tr class="tdbg">
  <td width="82" align="right">播放地址：</td><td width="468" height="40"><input name="f_alt" type="text" value="<%=HTMLEncode(rs("f_alt"))%>" size="40"></td>
</tr>
<tr class="tdbg"><td width="82" align="right">创建时间：</td><td width="468" height="40"><input type="text" name="f_adate" size="39" value='<%=rs("f_adate")%>'></td>
</tr>
<tr class="tdbg"><td width="82" align="right">修改时间：</td><td width="468" height="40"><input type="text" name="f_edate" size="39" value='<%=rs("f_edate")%>'></td>
</tr>
<tr class="tdbg"><td width="82" align="right">访问次数：</td><td width="468" height="40"><input type="text" name="f_click" size="39" value='<%=rs("f_click")%>'></td>
</tr>
  </table> 
  </center> 
</div> 
<p align="center">
<input type="submit" value="修改" name="okok"> 
<input type="reset" value="重写" name="reset">
</form>
</body> 
<%
rs.close
Set rs=nothing
conn.close
Set conn=nothing 
%>
</html>

						