我已知道，我想知道-----SQL+ADO 专题

ldy888

我已知道，我想知道-----SQL+ADO 专题

开篇语：很多时候只是需要一个关键词，一个简单的范例。面对浩如烟海的资讯，还真不知从何查起。不说别的
  仅仅我的电脑里，MSDN，ado帮助，api帮助，office帮助到现在我也没搞清楚有多少，这里面肯定有我想要，由于语言、思维习惯和知识面上的差异，要想找出来不是每次都那么顺利，上网搜索，也不一定找的到想要的。

我想要的也许正是你烂熟于心的，反之亦然。

把你已知道的(因该是比较难找的吧) 和你想知道的发上来吧, 我会整理到 1-2楼,我知道的就直接写上,不知道的等别人解答
  希望一段时间后
  你我都能在本贴找到满意的应用.

每天整理不太可能,每周2-3次应该能做到. 

人人为我，我为人人。本贴的出发点正在于此 .只不过更有所偏重与实用。文笔不咋的，先抛几块砖吧。希望掺乎的人多点

我已知道：

用代码创建表，并插入列，写好数据类型及长度
  新表 new1 ,a1 列，a2列，a3，a4

Public cnall As New ADODB.Connection ：cnall.open “略………..”

    cnall.Execute "CREATE TABLE new1 (a1 int,a2 varchar(2000),a3 varchar(2000),a4 varchar(5000))" '建表及加列 

    在已有的表里添加列  new1表里加入 a5，a6，a7列

    cnall.Execute "ALTER TABLE new1 add a5 Numeric(18,2),a6 text,a7 nvarchar(50)"  a5列数字型 小数 2 位 

ALTER TABLE new1 add a5 Decimal(2) " --------------15楼  

在已有的表里删除列  new1表里删除 a2，a4，a6列

cnall.Execute "ALTER TABLE New1 drop column a2,a4,a6"

在已有的表里增加 一列 种子 1 递增 1   new1表里加入 id列，种子 1 递增 1  ---11楼(注:一表只能有一种子)
 cnall.Execute "ALTER TABLE  new1 add id int IDENTITY"

SQL1是从前面的得得到查询结果再从查询中取出相关的结果简单如下即可-------15楼

strsql="select A,B from (" & SQL1 & ")" 

而在T-SQL中可要如下:
strsql="select a.A,a.B from (" & SQL1 & ") as a"

   1   进入路由器,2 DMZ主机ip设为 sql服务器的ip  3.把你的外网ip(或用花生壳) ,sql 用户名,密码,告诉别人,

   4 防火墙信任容许1433端口进站\出站   

   '需要引用：微软   ADO   Ext.2.6   for   dll   之后   Dim cat As New ADOX.Catalog这个定义才不会提示错误

     ************************************ 

  

  

[此贴子已经被作者于2007-4-11 15:57:04编辑过]

ldy888

我想知道;

"ALTER TABLE new1 add a5 Numeric(18,2) "默认值为0 ，说明(列的注释)为“此列为余额”

答：

默认值为0：

 "ALTER TABLE 联系人  add  new1 add a5 Numeric(18,2)   default 0"
“说明”我原以为可以是在后面加上“description '说明'”的，测试发现不可以，看来ADO追究精简，这个无关数据库实质的SQL项没有提供。但解决的方法应该不止一种，下面是ADOX的解决方法：

Sub aTestAdoEx()
  Dim cn As New ADODB.Connection
  Dim ct As New ADOX.Catalog
  cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & ThisWorkbook.Path & "\数据库名.mdb"
  Set ct.ActiveConnection = cn
  ct.Tables("表名").Columns("列名").Properties("description") = "My description"
  Set ct = Nothing
  Set cn = Nothing
End Sub

[此贴子已经被qee用于2007-6-27 10:27:50编辑过]

ldy888

数据库建表是相当繁琐的一件事。每个字段都要命名，设定数据类型，长度。

一两个表且字段不多，手工操作还能忍。

如果有上百个字段[em16]。。。。。。。。嘿嘿，累死你[em42]

我就累死不知几回了[em14]，为了会员兄弟姐妹不再受苦，把[em05]俺的小工具共享一下。

 

Sql & Access 数据库 建表加列工具

BhJaaBU8.rar (22.65 KB, 下载次数: 1038)

2007-4-10 13:21 上传

点击文件名下载附件
[原创]

[此贴子已经被作者于2007-4-10 13:23:40编辑过]

ldy888

占位

ldy888

占位

ldy888

占位

ldy888

占位

ldy888

占位

ldy888

占位

ldy888

占位