2024/8/8 15:24:38
<!--#include file="check.asp"--> <% '判断数据库是否有字段,没有就添加 Set rs=Conn.Execute("select * from data_e_news2") for i =0 to rs.Fields.Count - 1 allziduan=allziduan & "," & rs.Fields(i).Name next rs.close if instr(allziduan,"can6")=0 then '在现有的表中增加字段: Sql2="alter table [data_e_news2] add column [can1] varchar(255) NULL,[can2] varchar(255) NULL,[can3] varchar(255) NULL,[can4] varchar(255) NULL,[can5] varchar(255) NULL,[can6] varchar(255) NULL" conn.execute(sql2) response.write("can1,can2.can3.can4.can5.can6字段添加成功") end if %>