📄 setup.asp
字号:
'## Forum_SQL
strSql = "UPDATE " & strTablePrefix & "CONFIG "
strSql = strSql & " SET C_STRSHOWSTATISTICS = " & 1
strSql = strSql & " , C_STRSHOWIMAGEPOWEREDBY = " & 1
strSql = strSql & " , C_STRLOGONFORMAIL = " & 1
strSql = strSql & " , C_STRSHOWPAGING = " & 0
strSql = strSql & " , C_STRSHOWTOPICNAV = " & 0
strSql = strSql & " , C_STRPAGESIZE = " & 15
strSql = strSql & " , C_STRPAGENUMBERSIZE = " & 10
strSql = strSql & " , C_STRVERSION = '" & strNewVersion & "'"
strSql = strSql & " WHERE CONFIG_ID = " & 1
on error resume next
my_Conn.Errors.Clear
my_Conn.Execute (strSql)
Response.Write("<table border=""0"" cellspacing=""0"" cellpadding=""5"" width=""50%"" align=""center"">")
UpdateErrorCode = UpdateErrorCheck()
on error goto 0
if UpdateErrorCode = 0 then
Response.Write("<tr><td bgColor=green align=""left"" width=""30%""><font face=""宋体, Arial, Helvetica"" size=""2""><b>Upgraded: </b></font></td><td bgColor=navyblue align=""left""><font face=""宋体, Arial, Helvetica"" size=""2""> Added default values for new fields in CONFIG table</font></td></tr>")
elseif UpdateErrorCode = 2 then
Response.Write("<tr><td bgColor=red align=""left"" width=""30%""><font face=""宋体, Arial, Helvetica"" size=""2""><b>Critical error: </b></font></td><td bgColor=navyblue align=""left""><font face=""宋体, Arial, Helvetica"" size=""2"">Can't add default values for new fields in CONFIG table!<b></font></td></tr>")
intCriticalErrors = intCriticalErrors + 1
else
Response.Write("<tr><td bgColor=red align=""left"" width=""30%""><font face=""宋体, Arial, Helvetica"" size=""2""><b>Critical error: code: </b></font></td><td bgColor=navyblue align=""left""><font face=""宋体, Arial, Helvetica"" size=""2"">" & UpdateErrorCode & " while trying to add default values to the CONFIG table</font></td></tr>")
intCriticalErrors = intCriticalErrors + 1
end if
Response.Write("</table>")
Response.Flush
end if
if (OldVersion <= 2) then
Dim NewColumns2(29,11)
NewColumns2(0, Prefix) = strMemberTablePrefix
NewColumns2(0, FieldName) = "M_FIRSTNAME"
NewColumns2(0, TableName) = "MEMBERS"
NewColumns2(0, DataType_Access) = "TEXT (100)"
NewColumns2(0, DataType_SQL6) = "VARCHAR (100)"
NewColumns2(0, DataType_SQL7) = "NVARCHAR (100)"
NewColumns2(0, DataType_MYSQL) = "VARCHAR (100)"
NewColumns2(0, ConstraintSQL6) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC0369 DEFAULT ''"
NewColumns2(0, ConstraintSQL7) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC0369 DEFAULT ''"
NewColumns2(0, ConstraintMySQL) = "DEFAULT '' NULL"
NewColumns2(1, Prefix) = strMemberTablePrefix
NewColumns2(1, FieldName) = "M_LASTNAME"
NewColumns2(1, TableName) = "MEMBERS"
NewColumns2(1, DataType_Access) = "TEXT (100)"
NewColumns2(1, DataType_SQL6) = "VARCHAR (100)"
NewColumns2(1, DataType_SQL7) = "NVARCHAR (100)"
NewColumns2(1, DataType_MYSQL) = "VARCHAR (100)"
NewColumns2(1, ConstraintAccess) = "NULL"
NewColumns2(1, ConstraintSQL6) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC0370 DEFAULT ''"
NewColumns2(1, ConstraintSQL7) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC0370 DEFAULT ''"
NewColumns2(1, ConstraintMySQL) = "DEFAULT '' NULL"
NewColumns2(2, Prefix) = strMemberTablePrefix
NewColumns2(2, FieldName) = "M_OCCUPATION"
NewColumns2(2, TableName) = "MEMBERS"
NewColumns2(2, DataType_Access) = "TEXT (255)"
NewColumns2(2, DataType_SQL6) = "VARCHAR (255)"
NewColumns2(2, DataType_SQL7) = "NVARCHAR (255)"
NewColumns2(2, DataType_MYSQL) = "VARCHAR (255)"
NewColumns2(2, ConstraintAccess) = "NULL"
NewColumns2(2, ConstraintSQL6) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC0371 DEFAULT ''"
NewColumns2(2, ConstraintSQL7) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC0371 DEFAULT ''"
NewColumns2(2, ConstraintMySQL) = "DEFAULT '' NULL"
NewColumns2(3, Prefix) = strMemberTablePrefix
NewColumns2(3, FieldName) = "M_SEX"
NewColumns2(3, TableName) = "MEMBERS"
NewColumns2(3, DataType_Access) = "TEXT (50)"
NewColumns2(3, DataType_SQL6) = "VARCHAR (50)"
NewColumns2(3, DataType_SQL7) = "NVARCHAR (50)"
NewColumns2(3, DataType_MYSQL) = "VARCHAR (50)"
NewColumns2(3, ConstraintAccess) = "NULL"
NewColumns2(3, ConstraintSQL6) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC0372 DEFAULT ''"
NewColumns2(3, ConstraintSQL7) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC0372 DEFAULT ''"
NewColumns2(3, ConstraintMySQL) = "DEFAULT '' NULL"
NewColumns2(4, Prefix) = strMemberTablePrefix
NewColumns2(4, FieldName) = "M_AGE"
NewColumns2(4, TableName) = "MEMBERS"
NewColumns2(4, DataType_Access) = "TEXT (10)"
NewColumns2(4, DataType_SQL6) = "VARCHAR (10)"
NewColumns2(4, DataType_SQL7) = "NVARCHAR (10)"
NewColumns2(4, DataType_MYSQL) = "VARCHAR (10)"
NewColumns2(4, ConstraintAccess) = "NULL"
NewColumns2(4, ConstraintSQL6) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC0373 DEFAULT ''"
NewColumns2(4, ConstraintSQL7) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC0373 DEFAULT ''"
NewColumns2(4, ConstraintMySQL) = "DEFAULT '' NULL"
NewColumns2(5, Prefix) = strMemberTablePrefix
NewColumns2(5, FieldName) = "M_HOBBIES"
NewColumns2(5, TableName) = "MEMBERS"
NewColumns2(5, DataType_Access) = "MEMO"
NewColumns2(5, DataType_SQL6) = "TEXT"
NewColumns2(5, DataType_SQL7) = "NTEXT"
NewColumns2(5, DataType_MYSQL) = "TEXT"
NewColumns2(5, ConstraintAccess) = "NULL"
NewColumns2(5, ConstraintSQL6) = "NULL"
NewColumns2(5, ConstraintSQL7) = "NULL"
NewColumns2(5, ConstraintMySQL) = "NULL"
NewColumns2(6, Prefix) = strMemberTablePrefix
NewColumns2(6, FieldName) = "M_LNEWS"
NewColumns2(6, TableName) = "MEMBERS"
NewColumns2(6, DataType_Access) = "MEMO"
NewColumns2(6, DataType_SQL6) = "TEXT"
NewColumns2(6, DataType_SQL7) = "NTEXT"
NewColumns2(6, DataType_MYSQL) = "TEXT"
NewColumns2(6, ConstraintAccess) = "NULL"
NewColumns2(6, ConstraintSQL6) = "NULL"
NewColumns2(6, ConstraintSQL7) = "NULL"
NewColumns2(6, ConstraintMySQL) = "NULL"
NewColumns2(7, Prefix) = strMemberTablePrefix
NewColumns2(7, FieldName) = "M_QUOTE"
NewColumns2(7, TableName) = "MEMBERS"
NewColumns2(7, DataType_Access) = "MEMO"
NewColumns2(7, DataType_SQL6) = "TEXT"
NewColumns2(7, DataType_SQL7) = "NTEXT"
NewColumns2(7, DataType_MYSQL) = "TEXT"
NewColumns2(7, ConstraintAccess) = "NULL"
NewColumns2(7, ConstraintSQL6) = "NULL"
NewColumns2(7, ConstraintSQL7) = "NULL"
NewColumns2(7, ConstraintMySQL) = "NULL"
NewColumns2(8, Prefix) = strMemberTablePrefix
NewColumns2(8, FieldName) = "M_BIO"
NewColumns2(8, TableName) = "MEMBERS"
NewColumns2(8, DataType_Access) = "MEMO"
NewColumns2(8, DataType_SQL6) = "TEXT"
NewColumns2(8, DataType_SQL7) = "NTEXT"
NewColumns2(8, DataType_MYSQL) = "TEXT"
NewColumns2(8, ConstraintAccess) = "NULL"
NewColumns2(8, ConstraintSQL6) = "NULL"
NewColumns2(8, ConstraintSQL7) = "NULL"
NewColumns2(8, ConstraintMySQL) = "NULL"
NewColumns2(9, Prefix) = strMemberTablePrefix
NewColumns2(9, FieldName) = "M_MARSTATUS"
NewColumns2(9, TableName) = "MEMBERS"
NewColumns2(9, DataType_Access) = "TEXT (100)"
NewColumns2(9, DataType_SQL6) = "VARCHAR (100)"
NewColumns2(9, DataType_SQL7) = "NVARCHAR (100)"
NewColumns2(9, DataType_MYSQL) = "VARCHAR (100)"
NewColumns2(9, ConstraintSQL6) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC0374 DEFAULT ''"
NewColumns2(9, ConstraintSQL7) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC0374 DEFAULT ''"
NewColumns2(9, ConstraintMySQL) = "DEFAULT '' NULL"
NewColumns2(10, Prefix) = strMemberTablePrefix
NewColumns2(10, FieldName) = "M_LINK1"
NewColumns2(10, TableName) = "MEMBERS"
NewColumns2(10, DataType_Access) = "TEXT (255)"
NewColumns2(10, DataType_SQL6) = "VARCHAR (255)"
NewColumns2(10, DataType_SQL7) = "NVARCHAR (255)"
NewColumns2(10, DataType_MYSQL) = "VARCHAR (255)"
NewColumns2(10, ConstraintSQL6) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC0375 DEFAULT ''"
NewColumns2(10, ConstraintSQL7) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC0375 DEFAULT ''"
NewColumns2(10, ConstraintMySQL) = "DEFAULT '' NULL"
NewColumns2(11, Prefix) = strMemberTablePrefix
NewColumns2(11, FieldName) = "M_LINK2"
NewColumns2(11, TableName) = "MEMBERS"
NewColumns2(11, DataType_Access) = "TEXT (255)"
NewColumns2(11, DataType_SQL6) = "VARCHAR (255)"
NewColumns2(11, DataType_SQL7) = "NVARCHAR (255)"
NewColumns2(11, DataType_MYSQL) = "VARCHAR (255)"
NewColumns2(11, ConstraintSQL6) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC0376 DEFAULT ''"
NewColumns2(11, ConstraintSQL7) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC0376 DEFAULT ''"
NewColumns2(11, ConstraintMySQL) = "DEFAULT '' NULL"
NewColumns2(12, Prefix) = strMemberTablePrefix
NewColumns2(12, FieldName) = "M_CITY"
NewColumns2(12, TableName) = "MEMBERS"
NewColumns2(12, DataType_Access) = "TEXT (100)"
NewColumns2(12, DataType_SQL6) = "VARCHAR (100)"
NewColumns2(12, DataType_SQL7) = "NVARCHAR (100)"
NewColumns2(12, DataType_MYSQL) = "VARCHAR (100)"
NewColumns2(12, ConstraintSQL6) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC0377 DEFAULT ''"
NewColumns2(12, ConstraintSQL7) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC0377 DEFAULT ''"
NewColumns2(12, ConstraintMySQL) = "DEFAULT '' NULL"
NewColumns2(13, Prefix) = strMemberTablePrefix
NewColumns2(13, FieldName) = "M_PHOTO_URL"
NewColumns2(13, TableName) = "MEMBERS"
NewColumns2(13, DataType_Access) = "TEXT (255)"
NewColumns2(13, DataType_SQL6) = "VARCHAR (255)"
NewColumns2(13, DataType_SQL7) = "NVARCHAR (255)"
NewColumns2(13, DataType_MYSQL) = "VARCHAR (255)"
NewColumns2(13, ConstraintSQL6) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC0378 DEFAULT ''"
NewColumns2(13, ConstraintSQL7) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC0378 DEFAULT ''"
NewColumns2(13, ConstraintMySQL) = "DEFAULT '' NULL"
NewColumns2(14, Prefix) = strMemberTablePrefix
NewColumns2(14, FieldName) = "M_STATE"
NewColumns2(14, TableName) = "MEMBERS"
NewColumns2(14, DataType_Access) = "TEXT (100)"
NewColumns2(14, DataType_SQL6) = "VARCHAR (100)"
NewColumns2(14, DataType_SQL7) = "NVARCHAR (100)"
NewColumns2(14, DataType_MYSQL) = "VARCHAR (100)"
NewColumns2(14, ConstraintSQL6) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC0379 DEFAULT ''"
NewColumns2(14, ConstraintSQL7) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC0379 DEFAULT ''"
NewColumns2(14, ConstraintMySQL) = "DEFAULT '' NULL"
NewColumns2(15, Prefix) = strTablePrefix
NewColumns2(15, FieldName) = "C_STRFULLNAME"
NewColumns2(15, TableName) = "CONFIG"
NewColumns2(15, DataType_Access) = "SMALLINT"
NewColumns2(15, DataType_SQL6) = "SMALLINT"
NewColumns2(15, DataType_SQL7) = "SMALLINT"
NewColumns2(15, DataType_MySQL) = "SMALLINT"
NewColumns2(15, ConstraintAccess) = "NULL"
NewColumns2(15, ConstraintSQL6) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC1000 DEFAULT 0"
NewColumns2(15, ConstraintSQL7) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC1000 DEFAULT 0"
NewColumns2(15, ConstraintMySQL) = "DEFAULT 0 NULL"
NewColumns2(16, Prefix) = strTablePrefix
NewColumns2(16, FieldName) = "C_STRPICTURE"
NewColumns2(16, TableName) = "CONFIG"
NewColumns2(16, DataType_Access) = "SMALLINT"
NewColumns2(16, DataType_SQL6) = "SMALLINT"
NewColumns2(16, DataType_SQL7) = "SMALLINT"
NewColumns2(16, DataType_MySQL) = "SMALLINT"
NewColumns2(16, ConstraintAccess) = "NULL"
NewColumns2(16, ConstraintSQL6) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC1001 DEFAULT 0"
NewColumns2(16, ConstraintSQL7) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC1001 DEFAULT 0"
NewColumns2(16, ConstraintMySQL) = "DEFAULT 0 NULL"
NewColumns2(17, Prefix) = strTablePrefix
NewColumns2(17, FieldName) = "C_STRSEX"
NewColumns2(17, TableName) = "CONFIG"
NewColumns2(17, DataType_Access) = "SMALLINT"
NewColumns2(17, DataType_SQL6) = "SMALLINT"
NewColumns2(17, DataType_SQL7) = "SMALLINT"
NewColumns2(17, DataType_MySQL) = "SMALLINT"
NewColumns2(17, ConstraintAccess) = "NULL"
NewColumns2(17, ConstraintSQL6) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC1002 DEFAULT 0"
NewColumns2(17, ConstraintSQL7) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC1002 DEFAULT 0"
NewColumns2(17, ConstraintMySQL) = "DEFAULT 0 NULL"
NewColumns2(18, Prefix) = strTablePrefix
NewColumns2(18, FieldName) = "C_STRCITY"
NewColumns2(18, TableName) = "CONFIG"
NewColumns2(18, DataType_Access) = "SMALLINT"
NewColumns2(18, DataType_SQL6) = "SMALLINT"
NewColumns2(18, DataType_SQL7) = "SMALLINT"
NewColumns2(18, DataType_MySQL) = "SMALLINT"
NewColumns2(18, ConstraintAccess) = "NULL"
NewColumns2(18, ConstraintSQL6) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC1003 DEFAULT 0"
NewColumns2(18, ConstraintSQL7) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC1003 DEFAULT 0"
NewColumns2(18, ConstraintMySQL) = "DEFAULT 0 NULL"
NewColumns2(19, Prefix) = strTablePrefix
NewColumns2(19, FieldName) = "C_STRSTATE"
NewColumns2(19, TableName) = "CONFIG"
NewColumns2(19, DataType_Access) = "SMALLINT"
NewColumns2(19, DataType_SQL6) = "SMALLINT"
NewColumns2(19, DataType_SQL7) = "SMALLINT"
NewColumns2(19, DataType_MySQL) = "SMALLINT"
NewColumns2(19, ConstraintAccess) = "NULL"
NewColumns2(19, ConstraintSQL6) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC1004 DEFAULT 0"
NewColumns2(19, ConstraintSQL7) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC1004 DEFAULT 0"
NewColumns2(19, ConstraintMySQL) = "DEFAULT 0 NULL"
NewColumns2(20, Prefix) = strTablePrefix
NewColumns2(20, FieldName) = "C_STRAGE"
NewColumns2(20, TableName) = "CONFIG"
NewColumns2(20, DataType_Access) = "SMALLINT"
NewColumns2(20, DataType_SQL6) = "SMALLINT"
NewColumns2(20, DataType_SQL7) = "SMALLINT"
NewColumns2(20, DataType_MySQL) = "SMALLINT"
NewColumns2(20, ConstraintAccess) = "NULL"
NewColumns2(20, ConstraintSQL6) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC1005 DEFAULT 0"
NewColumns2(20, ConstraintSQL7) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC1005 DEFAULT 0"
NewColumns2(20, ConstraintMySQL) = "DEFAULT 0 NULL"
NewColumns2(21, Prefix) = strTablePrefix
NewColumns2(21, FieldName) = "C_STRCOUNTRY"
NewColumns2(21, TableName) = "CONFIG"
NewColumns2(21, DataType_Access) = "SMALLINT"
NewColumns2(21, DataType_SQL6) = "SMALLINT"
NewColumns2(21, DataType_SQL7) = "SMALLINT"
NewColumns2(21, DataType_MySQL) = "SMALLINT"
NewColumns2(21, ConstraintAccess) = "NULL"
NewColumns2(21, ConstraintSQL6) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC1006 DEFAULT 0"
NewColumns2(21, ConstraintSQL7) = "NULL CONSTRAINT " & strTablePrefix & "SnitzC1006 DEFAULT 0"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -