在线数据库管理工具(db007) v1.5

型)</option>"
strlist = strlist & "<option value=""Decimal"">decimal(精确数值型)</option>"
strlist = strlist & "<option value=""Float"">float(近似数值型)</option>"
strlist = strlist & "<option value=""Image"">image(二进制数据类型)</option>"
strlist = strlist & "<option value=""Int"">int(整型)</option>"
strlist = strlist & "<option value=""Money"">money(货币型)</option>"
strlist = strlist & "<option value=""nchar"">nchar(统一编码字符型)</option>"
strlist = strlist & "<option value=""ntext"">ntext(统一编码字符型)</option>"
strlist = strlist & "<option value=""numeric"">numeric(精确数值型)</option>"
strlist = strlist & "<option value=""nvarchar"">nvarchar(统一编码字符型)</option>"
strlist = strlist & "<option value=""real"">real(近似数值型)</option>"
strlist = strlist & "<option value=""smalldatetime"">Smalldatetime(日期时间型)</option>"
strlist = strlist & "<option value=""smallint"">smallint(整型)</option>"
strlist = strlist & "<option value=""smallmoney"">smallmoney(货币型)</option>"
strlist = strlist & "<option value=""sql_variant"">sql_variant()</option>"
strlist = strlist & "<option value=""text"">text(字符型)</option>"
strlist = strlist & "<option value=""timestamp"">timestamp(特殊数据型)</option>"
strlist = strlist & "<option value=""tinyint"">tinyint(整型)</option>"
strlist = strlist & "<option value=""uniqueidentifier"">Uniqueidentifier(特殊数据型)</option>"
strlist = strlist & "<option value=""varbinary"">varbinary(二进制数据类型)</option>"
strlist = strlist & "<option value=""varchar"">varchar(字符型)</option>"
end if
str1 = """" & n & """"
str2 = """" & n & """" & " selected"
strlist = replace(strlist,str1,str2)
strlist = strlist & "</select>"
echo strlist
End Function

''==================================================================主界面
sub main(str)
on error resume next
%>
<script language=javascript>
ie = (document.all)? true:false
if (ie){
function ctlent(eventobject){if(event.ctrlKey &&
window.event.keyCode==13){this.document.exesql.submit();}}
}
</script>
<script language="javascript">
function table_delete()
{
if (confirm("确认删除该记录吗？ 该操作将不可撤销！！！"))
return true;
else
return false;
}
</script>

<form action="?key=sql" method=post name="exesql">
<font color=red>执行sql语句：</font><font color=#999999>(每句语句以“;”结束，支持(--)SQL注释，Ctrl + Enter 快速提交)</font> <input type="button" value