addfield.asp

来自「SmartCity远程数据库管理系统 本系统可使您不打开Microsoft A」· ASP 代码 · 共 17 行

<!-- #include file="connmdb.asp" -->
<%
	dim tablename,fieldname,fieldtype,charnum,field
	tablename = request("tablename")
	fieldname = request("fieldname")
	fieldtype = request("fieldtype")
	charnum = request("charnum")
	field = "[" & fieldname & "] " & fieldtype
	if fieldtype = "text" then
		field = field & "(" & charnum & ")"
	end if

	sql = "alter table ["&tablename&"] add "&field&""
	conn.execute sql	

	response.redirect "addnewfield.asp?tablename="&tablename&""
%>