lblog105-lblog106_update.asp

来自「L-Blog是一套BLOG系统」· ASP 代码 · 共 23 行

<%
Dim SQL,Conn
Set Conn= Server.CreateObject("ADODB.Connection")
Conn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("L-Blog.mdb")
Conn.Open


''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

Conn.ExeCute("ALTER TABLE [blog_Content] ADD log_DisComment yesno DEFAULT False")
Conn.ExeCute("UPDATE blog_Content SET log_DisComment=False")


'如果你升级置顶功能请将以下代码加上注释！

Conn.ExeCute("ALTER TABLE [blog_Content] ADD log_IsTop yesno DEFAULT False")
Conn.ExeCute("UPDATE blog_Content SET log_IsTop=False")

Response.Write("数据库升级成功，请删除lblog105-lblog106_update.asp文件")

Conn.Close
Set Conn=Nothing
%>