<!-- #include file="../../conn.asp" -->
<!-- #include file="conn1.asp" -->
<%Call Head()
Call saycardd("增加数据库表字段")
tp=request("tp")
if tp<>"" then

liao.execute( "alter table sx drop column xue") 
liao.execute( "ALTER TABLE sx add xue Byte")


%>
增加数据库表字段成功!!<br/>
<%Set fs = Server.CreateObject("Scripting.FileSystemObject")
File = Server.MapPath("/bbs/yxxe/sjsjk.asp")
on Error Resume Next
fs.DeleteFile File, True '强制删除只读文件
If Err.Number = 53 Then
 Response.Write File & "文件不存在！"
 Response.End
Elseif Err.Number = 70 Then
 Response.Write File & "文件属性为锁定状态！"
 Response.End
Elseif Err.Number <> 0 Then
 Response.Write "未知错误，错误编码：" & Err.Number
 Response.End
Else
 Response.Write "成功删除此文件！<br/>" 
 End If
 Set fs = Server.CreateObject("Scripting.FileSystemObject")
File = Server.MapPath("/bbs/yxxe/index.asp")
on Error Resume Next
fs.DeleteFile File, True '强制删除只读文件

 Set fs = Server.CreateObject("Scripting.FileSystemObject")
SFile = Server.MapPath("/bbs/yxxe/index11111.asp")
NFile = Server.MapPath("/bbs/yxxe/index.asp")
fs.MoveFile SFile, NFile
else
response.Write"是否升级"
response.Write"<a href=""sjsjk.asp?tp=1&amp;sid="&sid&"&amp;saytk="&saytk&""">是</a>"
response.Write"|"
response.Write"<a href=""index.asp?sid="&sid&"&amp;saytk="&saytk&""">否</a>"
response.write"<br/>"
end if%>
<a href='index.asp?saytk=<%=saytk%>&amp;sid=<%=sid%>'>江湖首页</a><br/>
<%
call headsay()
%>
