使用方法 ： 保存为 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">
<adal>
<meta http-equiv = "content-type" content = "text / html; charset = gb2312" />
<meta name = "auteur" content = "柳永法" />
<Title> ASP 辅助工具 </TITME>
<style> Body {Font-Size: 12px} </ Style>
<HTA: application
Id = "asptools"
ApplicationName = "asptools"
Scroll = "non"
Singleinstance = "Oui"
Fenêtre = "normal"
>
</ head>
<body>
<div>
<input type = "file" id = "txtfile" onchange = "createTableSelect ('access')" style = "affiche: aucun" />
IP: <input type = "text" name = "ip" size = "16" style = "border: 1px Solid Green" value = "./ sql2005" />
登录名: <input type = "text" name = "userId" size = "10" style = "border: 1px solide vert" value = "sa" />
密码 ： <entrée type = "mot de passe" name = "pwd" size = "10" style = "border: 1px Solid Green" value = "yongfa365" />
数据库名 ： <input type = "text" name = "dbname" size = "10" style = "border: 1px solide vert" value = "hb605-8-8" /> <r />>
<entrée name = "Button2" type = "bouton" id = "bouton2" style = "Border: 1px Green solide" onclick = "CreateTableSelect
('Mssql') "value =" 连接 sql 数据库 "/>
<entrée type = "bouton" id = "btnfromfile" onclick = "txtfile.click ()" value = "连接 Access 数据库" style = "border: 1px solide
vert "/>
<span id = "tables"> </span>
<hr />
：
<input type = "text" id = "opt" value = "" size = "40" />
<select size = "1" id = "fz" onchange = "opt.value = this.value"> </lect>
<entrée name = "bouton" type = "bouton" id = "bouton" onclick = "c ()" value = "转换" style = "border: 1px solide vert">
<hr />
<textarea id = "s" rows = "10" cols = "80"> </ textarea>
<entrée type = "bouton" onclick = "madesql ()" value = "生成 sql 语句" style = "border: 1px solide vert" />
<textarea id = "d" rows = "10" cols = "80"> </ textarea>
</div>
<pre id = "sqldemo" style = "affichage: aucun" intro = "通用建表结构">
- 通用建表结构
Créer une table [dbo]. [TableName] (
[Id] INT Identité de clé primaire (1,1), - id ， 主键 ， 自动号
[txttitle] varchar (255), - 标题
[txtContent] Texte, - 内容
[Puttime] DateTime par défaut (getDate ()), - 提交时间
[Moditetime] DateTime par défaut (getDate ()), - 修改时间
[Hits] int défaut (0), - 点击数
[Flags] int défaut (0), - 标识
[ORDERID] int défaut (0), - 排序号
)
</pre>
<pre id = "sdemo" style = "affichage: aucun" intro = "初始源测试数据">