使用方法 ： 保存为 asptools.hta 然后再运行
代码如下::
<! DocType html public "-// w3c // dtd xhtml 1.0 transitional // en" "http://www.w3.org/tr/xhtml1/dtd/xhtml1-
transitional.dtd ">
<html xmlns = "http://www.w3.org/1999/xhtml">
<kopf>
<meta http-äquiv = "content-type" content = "text /html; charset = gb2312" />
<meta name = "Autor" content = "柳永法" />
<title> ASP 辅助工具 </title>
<Styles> Body {Schriftgröße: 12px} </style>
<Hta: Anwendung
Id = "asptools"
ApplicationName = "asptools"
Scroll = "nein"
SingleInInstance = "Ja"
WindowState = "normal"
>
</head>
<body>
<div>
<input type = "Datei" id = "txtFile" onchange = "createTableSelect ('Access')" style = "display: none" />
IP: <Eingabe type = "text" name = "ip" size = "16" style = "border: 1px fest grün" value = "./ SQL2005" />
登录名 ： <Eingabe type = "text" name = "userId" size = "10" style = "border: 1px diples grün" value = "sa" />
密码 ： <Eingabe type = "Passwort" name = "pwd" size = "10" style = "border: 1px solide grün" value = "yongfa365" />
数据库名 ： <Eingabe type = "text" name = "dbname" size = "10" style = "border: 1px solide grün" value = "hb605-8-8" /> <br />
<input name = "button2" type = "button" id = "button2" style = "border: 1px fest grün" onclick = "createTableSelect
('MSSQL') "value =" 连接 sql 数据库 " />
<Eingabe type = "button" id = "btnfromFile" onclick = "txtFile.click ()" value = "连接 access 数据库" style = "border: 1px solide
grün " />
<span id = "Tabellen"> </span>
<hr />
模板 ：
<Eingabe type = "text" id = "opt" value = "" size = "40" />
<select size = "1" id = "fz" onchange = "opt.value = this.value"> </select>
<input name = "button" type = "button" id = "button" onclick = "c ()" value = "转换" style = "border: 1px solide grün">
<hr />
<textArea id = "s" rows = "10" cols = "80"> </textArea>
<input type = "button" "onclick =" madesql () "value =" 生成 sql 语句 "style =" border: 1px fest grün " />
<textArea id = "d" rows = "10" cols = "80"> </textArea>
</div>
<pre id = "sqldemo" style = "display: keine" intro = "通用建表结构">
-通用建表结构
Tabelle erstellen [dbo]. [TableName] (
[ID] int Primärschlüsselidentität (1,1),-id ， 主键 ， 自动号
[txtTitle] varchar (255),-标题
[txtContent] Text,-内容
[PutTime] DateTime Standard (getDate ()),-提交时间
[Moditime] datetime default (getDate ()), 修改时间
[Hits] int Standard (0),-点击数
[Flags] int Standard (0),-标识
[Orderid] int default (0),-排序号
)
</pre>
<pre id = "sdemo" style = "display: keine" intro = "初始源测试数据">