首页 Soft PlugIn RAN乱 Dev开发 Info资料 English WAP 留言 登陆 注册
-
Posted by Yippee | 评论(2) | 引用(3) | 阅读1561次
华工达梦国产数据库尝试3 VB编程2

今天下午继续测试了一下:www.shengfang.org

1、控制台-达梦服务器组--LOCALHOST--安全--登陆--SYSDBA
一般访问:密码:我试着输入150个1,点击应用,没有出错提示,但是重新连接仍然是旧密码

2、jisql--选项--设置最大行数,没有输入限制,可以输入字母,输入50个1,可以确定,但是不生效

3、在JMANAGER中修改SFF表,增加一字段,切换到 约束,点击 + 号,勾选 选择 SF 字段,点击应用,出现 JAVA.SQL.SQLEXCEPTION:RUN_TIME ERROR NUMBER=-3061 www.shengfang.org

4、去掉 勾选,左边 树 点击SFF 表下面的 索引,提示要保存修改结果吗?选择 确定。提示 UNIQUE约束中没有选中任何列,此时只能点击确定,之后,字段修改结果丢失。www.shengfang.org

5、任务栏状态区上面的DM4 SERVER小图标,点击右键,关联菜单总是在最右下角弹出,例如图标已经在任务区的左边,右边还有一些杀毒软件、GB、EMAIL之类的图标,但是菜单显示在最右下。

6、VB写了几行代码:非常简单的,使用msado15.dll#Microsoft ActiveX Data Objects 2.8 Library

Option Explicit
Dim dm As New ADODB.Connection
Dim dmcmd As New ADODB.Command
Dim ac As New ADODB.Connection
Dim accmd As New ADODB.Command
Dim sq As New ADODB.Connection
Dim sqcmd As New ADODB.Command
Private Sub Command1_Click()
Debug.Print "dm begin:", Timer
Dim i As Integer
For i = 0 To 10000
    dmcmd.CommandText = "insert into ""SYSTEM"".""INFO_SCHEM"".""SFF""(SF) values('" + Format(i) + "')"
    dmcmd.Execute
Next
Debug.Print "dm end :", Timer
End Sub
Private Sub Command2_Click()
Debug.Print "ac begin:", Timer
Dim i As Integer
For i = 0 To 10000
    accmd.CommandText = "insert into sff values('" + Format(i) + "')"
    accmd.Execute
Next
Debug.Print "ac end :", Timer
End Sub
Private Sub Command3_Click()
Debug.Print "sq begin:", Timer
Dim i As Integer
For i = 0 To 10000
    sqcmd.CommandText = "insert into sff values('" + Format(i) + "')"
    sqcmd.Execute
Next
Debug.Print "sq end :", Timer
End Sub

Private Sub Form_Load()
dm.CursorLocation = adUseClient
dm.Open "PROVIDER=MSDASQL;dsn=sf;uid=SYSDBA;pwd=123123;database=system;"
Set dmcmd.ActiveConnection = dm
ac.CursorLocation = adUseClient
ac.Open "PROVIDER=MSDASQL;dsn=sfff;uid=;pwd=;"
Set accmd.ActiveConnection = ac
sq.CursorLocation = adUseClient
sq.Open "PROVIDER=MSDASQL;dsn=sq;uid=sa;pwd=sffs;database=phs;"
Set sqcmd.ActiveConnection = sq
End Sub

结果如下:其中DM代表达梦、AC代表ACCESS、SQ代表MSDE 2000,所有表名都是SFF,下面有一个字段SF,全部采用默认值,例如DM是char(10),AC是文本(50),msde是CHAR(10)

dm begin: 55832.08  dm begin:  55869.71  dm begin: 56378.77
dm end :  55836.39  dm end :   55873.96   dm end :  56383.09
ac begin: 55948.19  ac begin:  55966.22   ac begin: 56384.93
ac end :  55951.09  ac end :    55969.29   ac end : 56387.96
sq begin: 56316.5   sq begin:   56333.96   sq begin: 56389.17
sq end :  56319.34  sq end :    56336.56   sq end :  56391.74

以上是1000条插入,下面是10000条插入

dm begin:  56585.92 ac begin: 56768.63 sq begin:      56835.28
dm end :   56635.68 ac end :  56800.46 sq end :       56863.34

ac begin:      58630.98  sq begin:      58908.63 dm begin:      59138.11
ac end :       58797.15  sq end :       59062.89  dm end :       59356.91 五万条

本来想测试一下数据库大小的,但是时间不够了,明天再看看

Timer 函数
返回一个 Single,代表从午夜开始到现在经过的秒数。
Microsoft Windows中,Timer函数返回一秒的小数部分。

华工达梦国产数据库尝试2 VB编程1  华工达梦国产数据库尝试


字体:

Permanant URI永久地址 http://www.shengfang.org/blog/p/vbdm4data2.php
Trackback URI引用地址 http://www.shengfang.org/blog/tb.php?tb_id=1121413784

2005年7月15日15:49星期五  [Dev开发] 追踪此文的RSS
hi_kitty在 2007年10月17日14:46星期三 评论:
客户端应该做得更精致一点
Yippee 回复于 2007年10月17日15:27
:)

TITI在 2005年7月20日09:35星期三 评论:
客户端工具实在是差强人意
Yippee 回复于 2005年7月20日09:48
这个是很正常的,术业有专攻。只不过我做客户端多,所以对一些细节比较敏感而已。

称呼:    登陆   注册
   不注册,但记住我的信息
邮件:
(非必须)
评论: [UBB代码帮助]
粗体 斜体 下划线 链接 水平线 引用



验证码: 请输入你看见的数字
关闭UBB      提交时自动将内容复制到剪贴板

公告
Fire and Motion!

统计信息
[Yippee]||[统计]||日志:1858
在线: 6||用户: 2577 [列表]
今日:396||到访:2886460
Rss:897741||评论:1605

最新日志

最新评论

友情链接

日历
2008 - 08
     12
3456789
10111213141516
17181920212223
24252627282930
31      

最新引用

搜索

归档

杂项
Get RSS Feed (Version 2.0)
Get Atom Feed (Version 0.3)
编码:  UTF-8