| ASP创建ACCESS表或添加字段 |
创建一张空表：
pr69uB http://blog.numino.net/
Sql="Create TABLE [表名]"
ril9dQ http://blog.numino.net/
创建一张有字段的表：
ZJQlh0 http://blog.numino.net/
Sql="Create TABLE [表名]([字段名1] MEMO NOT NULL, [字段名2] MEMO, [字段名3] COUNTER NOT NULL, [字段名4] DATETIME, [字段名5] TEXT(200), [字段名6] TEXT(200))
42twtn http://blog.numino.net/
字段类型：
W2o5ei http://blog.numino.net/
2 : "SmallInt", // 整型
x3UsVp http://blog.numino.net/
3 : "Int", // 长整型
2FcDVK http://blog.numino.net/
4 : "Real", // 单精度型
1VjB2T http://blog.numino.net/
5 : "Float", // 双精度型
Y94v6Y http://blog.numino.net/
6 : "Money", // 货币
6eRg3y http://blog.numino.net/
7 : "DateTime", // 日期时间
Jb6yD2 http://blog.numino.net/
11 : "Bit", // 是否
6kBBdM http://blog.numino.net/
13 : "TimeStamp",
TuHrwq http://blog.numino.net/
17 : "TinyInt", // 字节
zI86Bj http://blog.numino.net/
72 : "UniqueIdentifier", // 同步复制 ID
1Rqcta http://blog.numino.net/
128 : "Binary",
li8b02 http://blog.numino.net/
129 : "Char",
RyZCE8 http://blog.numino.net/
130 : "NChar",
GUBycQ http://blog.numino.net/
131 : "Decimal", // 小数
saH98y http://blog.numino.net/
133 : "DateTime",
01DDEa http://blog.numino.net/
135 : "SmallDateTime",
aUXEv0 http://blog.numino.net/
200 : "VarChar",
g2vCmK http://blog.numino.net/
201 : "Text",
0HT053 http://blog.numino.net/
202 : "VarChar", // 文本
c774Ca http://blog.numino.net/
203 : "Text", // 备注
LNbg3p http://blog.numino.net/
204 : "Binary", // 二进制
XJIQ94 http://blog.numino.net/
205 : "Image" // OLE 对象
Z5Z5mi http://blog.numino.net/
以下字段为无编码字段（NChar、NVarchar、NText型）
jn8aMG http://blog.numino.net/
8,128,130,202,203,204,205
D83Ta7 http://blog.numino.net/
以下字段为按当前系统内码编码的字段（Asp中可用CodePage=936纠正为gb2312内码）
Dpv4VU http://blog.numino.net/
129,200,201
K1Bh42 http://blog.numino.net/
在现有的表中增加字段：
WJ6wv7 http://blog.numino.net/
Sql="alter table [表名] add column [字段名] varchar(200)"
G435uK http://blog.numino.net/
修改字段类型：
pf2xTu http://blog.numino.net/
Sql="alter table [表名] Alter COLUMN 字段名] varchar(50)"
cmHmFA http://blog.numino.net/
删除表：
bLjiZ9 http://blog.numino.net/
Sql="Drop table [表名]"
9V8Tpz http://blog.numino.net/
删除字段：
zz1e26 http://blog.numino.net/
sql="alter table [表名] drop [字段名]"
HdE11z http://blog.numino.net/
修改字段：Alter TABLE [表名] Alter COLUMN [字段名] 类型(大小) NULL
HDYSQ1 http://blog.numino.net/
新建约束：Alter TABLE [表名] ADD CONSTRAINT 约束名 CHECK ([约束字段] <= '2007-1-1')
Zct2Zc http://blog.numino.net/
删除约束：Alter TABLE [表名] Drop CONSTRAINT 约束名
Ten8Ht http://blog.numino.net/
新建默认值：Alter TABLE [表名] ADD CONSTRAINT 默认值名 DEFAULT 'Gziu.CoM' FOR [字段名]
AtT9HP http://blog.numino.net/
删除默认值：Alter TABLE [表名] Drop CONSTRAINT 默认值名
5QjVzp http://blog.numino.net/
=======================================
HoUBi7 http://blog.numino.net/
conn.open connstr
VFMeJM http://blog.numino.net/
sql="alter table [tablename] add hehe char(20)"
BIPRBC http://blog.numino.net/
conn.execute(sql)
BXbOr2 http://blog.numino.net/
response.write("添加成功")
510tFl http://blog.numino.net/
ACCESS新建数据库和表还不简单，有了表字段初始化就更简单
R9r9T9 http://blog.numino.net/
=======================================
f968B8 http://blog.numino.net/
<%
KsWb0l http://blog.numino.net/
session("tablen")="news"
J199RO http://blog.numino.net/
'news是已存在的表名
ImF2mE http://blog.numino.net/
session("fieldsn")="c"
p3gV0e http://blog.numino.net/
'要添加的字段名
4OEwln http://blog.numino.net/
connectionstring="provider=microsoft.jet.oledb.4.0;data source="&server.MapPath("data/qq.mdb")
2AguN3 http://blog.numino.net/
set conn=server.createobject("adodb.connection")
kuZ4E9 http://blog.numino.net/
conn.OPEN connectionstring
b21xln http://blog.numino.net/
jhsql = " Alter Table "&session("tablen")&" add column "&session("fieldsn")&" real "
H2nCXN http://blog.numino.net/
conn.execute(jhsql)
m5DVz9 http://blog.numino.net/
%>
3r8yVv http://blog.numino.net/
================================
3I8f2X http://blog.numino.net/
生成数据表，添加字段，其中id字段为自动增加，测试通过~~
FIc3Jw http://blog.numino.net/
Sub GenAutoIncrementFld()
a0h7tJ http://blog.numino.net/
set cn=server.CreateObject("ADODB.Connection")
rQ12P4 http://blog.numino.net/
set clx=server.CreateObject("ADOX.Column")
53WTUN http://blog.numino.net/
set cat=server.CreateObject("ADOX.Catalog")
xDclq4 http://blog.numino.net/
set tblnam=server.CreateObject("ADOX.Table")
x5W7TZ http://blog.numino.net/
5mGKak http://blog.numino.net/
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\网站制作\asp操作mdb\db\test.mdb"
985CSQ http://blog.numino.net/
Set cat.ActiveConnection = cn
YHE61z http://blog.numino.net/
tblnam.Name = "Test"
5MyeqX http://blog.numino.net/
clx.ParentCatalog = cat
DtW3U3 http://blog.numino.net/
O2NtGH http://blog.numino.net/
clx.Type = 3
0JrZqk http://blog.numino.net/
clx.Name = "Id"
tQGZ0O http://blog.numino.net/
clx.Properties("AutoIncrement") = true
t7byv3 http://blog.numino.net/
tblnam.Columns.Append clx
vBI6bw http://blog.numino.net/
tblnam.Columns.Append "DataField",130,20
5JNjPs http://blog.numino.net/
cat.Tables.Append tblnam
qOlmeC http://blog.numino.net/
Set clx = Nothing
yhcmvt http://blog.numino.net/
Set cat = Nothing
J0uY7H http://blog.numino.net/
cn.Close
wrbCSI http://blog.numino.net/
Set cn = Nothing
4607VA http://blog.numino.net/
End Sub
t8k7PZ http://blog.numino.net/
call GenAutoIncrementFld
B2wZS8 http://blog.numino.net/
===================================
PVVc2M http://blog.numino.net/
字段类型对应数值
XXfeBq http://blog.numino.net/
''---- DataTypeEnum Values ----
Ot12d0 http://blog.numino.net/
Const adEmpty = 0
3woI5h http://blog.numino.net/
Const adTinyInt = 16
fgdT1k http://blog.numino.net/
Const adSmallInt = 2
jncgP4 http://blog.numino.net/
Const adInteger = 3
wNflG2 http://blog.numino.net/
Const adBigInt = 20
h7141z http://blog.numino.net/
Const adUnsignedTinyInt = 17
kR43YP http://blog.numino.net/
Const adUnsignedSmallInt = 18
v0vlcM http://blog.numino.net/
Const adUnsignedInt = 19
1u5tEc http://blog.numino.net/
Const adUnsignedBigInt = 21
Y5WJ7i http://blog.numino.net/
Const adSingle = 4
E83pfV http://blog.numino.net/
Const adDouble = 5
1237WA http://blog.numino.net/
Const adCurrency = 6
DmmDYf http://blog.numino.net/
Const adDecimal = 14
8GQvlg http://blog.numino.net/
Const adNumeric = 131
ki963x http://blog.numino.net/
Const adBoolean = 11
KbCO5Z http://blog.numino.net/
Const adError = 10
aO8H31 http://blog.numino.net/
Const adUserDefined = 132
3eaNl2 http://blog.numino.net/
Const adVariant = 12
rnaKBX http://blog.numino.net/
Const adIDispatch = 9
fBSPPK http://blog.numino.net/
Const adIUnknown = 13
AVC4M3 http://blog.numino.net/
Const adGUID = 72
4nQ87t http://blog.numino.net/
Const adDate = 7
5r2E4b http://blog.numino.net/
Const adDBDate = 133
4pJaUS http://blog.numino.net/
Const adDBTime = 134
K55KNn http://blog.numino.net/
Const adDBTimeStamp = 135
2InXw8 http://blog.numino.net/
Const adBSTR = 8
8u72dm http://blog.numino.net/
Const adChar = 129
vt15cY http://blog.numino.net/
Const adVarChar = 200
7aNqS9 http://blog.numino.net/
Const adLongVarChar = 201
5lZZ8q http://blog.numino.net/
Const adWChar = 130
L20j3T http://blog.numino.net/
Const adVarWChar = 202
5ERTE1 http://blog.numino.net/
Const adLongVarWChar = 203
57L26l http://blog.numino.net/
Const adBinary = 128
Q84HS1 http://blog.numino.net/
Const adVarBinary = 204
8aaqFT http://blog.numino.net/
Const adLongVarBinary = 205
e0BZ1O http://blog.numino.net/
Const adChapter = 136
EFWbL0 http://blog.numino.net/
Const adFileTime = 64
bS1z12 http://blog.numino.net/
Const adPropVariant = 138
1tvDiI http://blog.numino.net/
Const adVarNumeric = 139
v9AbTv http://blog.numino.net/
Const adArray = &H2000
|
|