<!--#include file="conn.Asp"-->
<!--#include file="function.Asp"-->
<!--#include file="../inc/url.asp"-->
<%CheckAdmin3%>


<%
function object_install(strclassstring)
  'on error resume next
  object_install=false
  dim xtestobj
  set xtestobj=server.createobject(strclassstring)
  if -2147221005 <> Err then object_install=true
  set xtestobj=nothing
end function

if request("method")=1 then
	if object_install("Scripting.FileSystemobject")=false then
		response.write "<script language=javascript>alert('你的服务器不支持 FSO(Scripting.FileSystemObject)! 不能够修改');location.href='admin_system.asp';</script>"
	else
		set fso=Server.CreateObject("Scripting.FileSystemObject")
		set rs=fso.CreateTextFile(Server.MapPath("../inc/url.asp"),true)
		rs.write "<" & "%"  & vbcrlf                                                                
		rs.write " url1=" & chr(34) & trim(request("url1")) & chr(34) & "			        '路径1" & vbcrlf
		rs.write " url2=" & chr(34) & trim(request("url2")) & chr(34) & "			        '路径2" & vbcrlf
		rs.write " url3=" & chr(34) & trim(request("url3")) & chr(34) & "			        '路径3" & vbcrlf

		
rs.write "%" & ">"
	rs.close
	set rs=nothing
	set fso=nothing	
	response.write "<script language=javascript>alert('修改成功!');location.href='888wang_url.asp';</script>"
	response.end
end if
end if
%>
<head>
<link href="Style.css" rel="stylesheet" type="text/css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"></head>
<body  leftmargin="0" rightmargin="0" bottommargin="0" topmargin="0">
<table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
<form action method="post" name="myform" id="myform" onSubmit="return check(myform)">
  <tr>
    <td height="30">&nbsp;</td>
  </tr>
  <tr>
    <td><table width="100%" border="0" align="center" cellpadding="3" cellspacing="1" class="bordercolor">
          <tr align="center" class="bg1"> 
            <td height="28" colspan="3"><strong>== 
              音乐数据路径配置 ==</strong>&nbsp;  </td>
          </tr>
          <tr> 
            <td width="259" height="25" align="right">路径1:&nbsp;</td>
            <td width="620" colspan="2" bgcolor="#FFFFFF"><font color="#FF6600"> 
              <input type="text" name="url1" size="40" maxlength="100" value="<%=url1%>">
              </font></td>
          </tr>
           <tr> 
            <td height="25" align="right">路径2:&nbsp;</td>
            <td width="620" colspan="2" bgcolor="#FFFFFF"><font color="#FF6600"> 
              <input type="text" name="url2" size="40" maxlength="100" value="<%=url2%>">
              </font></td>
          </tr>          <tr> 
            <td height="25" align="right">路径3:&nbsp;</td>
            <td width="620" colspan="2" bgcolor="#FFFFFF"><font color="#FF6600"> 
              <input type="text" name="url3" size="40" maxlength="100" value="<%=url3%>">
              </font></td>
          </tr>
          
        </table></td>
  </tr>
  <tr>
      <td height="40" align="center">
	  			<input type="hidden" name="method" value="1">
				<input name="submit" type="submit"  value="修改"> &nbsp;&nbsp;&nbsp;&nbsp; 
              <input type="reset"  name="Submit2" value="重写">
      </td>
  </tr>
        </form>
</table>

</body>






