| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2439 人关注过本帖
标题:[求助]找不到文件
只看楼主 加入收藏
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
收藏
得分:0 
嗯 ..那就好.

我的msn: myfend@
2006-12-21 20:34
PcrazyC
Rank: 6Rank: 6
等 级:贵宾
威 望:29
帖 子:5652
专家分:0
注 册:2006-10-20
收藏
得分:0 

问题总结:

(一)让数据库随工程的移动不影响工程的运行
(1)使用ADODC控件时,为了达到目的,只有在代码中设置ADODC的ConnectionString属性,用App.Path实现相对路径
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & App.Path & "\imformation.mdb"
然后设置命令类型为adCmdText Adodc1.CommandType = adCmdText
然后设置RecordSource属性 Adodc1.RecordSource = "select * from [user]" [user]是为了避免user是关键字
最后还要刷新一下 Adodc1.Refresh

(2)使用ADODB对象模型,用Recordset对象作为DataSource的数据源
Private Sub Form_Load()
Set conn = New ADODB.Connection
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=" & App.Path & "\imformation.mdb"
conn.Open
Dim RST As ADODB.Recordset
Set RST = New ADODB.Recordset
Rst.CursorLocation = adUseClient '设置游标引擎的位置为adUseClient,当用于客户端Recordset或Connection对象时,只能设置为adUseClient
RST.Open "select * from user", conn, 2, 2
Set DataGrid1.DataSource = RST
End Sub

(二)焦点的问题
大多数控件都有TabStop和TabIndex两个属性,与TAB按键有关的,如果TabStop设置为TURE,则在运行的时候,TAB按键会移动到上面,即可以用TAB按键获得焦点,当设置为FLASE时,将不能通过TAB获得焦点,同时关于LOAD后焦点落在哪个控件上,先起作用的是TabStop属性只要有设置为TURE的,就不可能落到FLASE的上面,如果有几个都为TURE时,再看TABINDEX属性,焦点设置在小的上面,如果都是FLASH时,焦点落在TABINDEX最小的上面,TAB按键不起作用,当改变一个TABINDEX属性值时,其它的也会跟着变化,有规律,自己可以去试试,我就不说了

有什么不足的地方,版主补充一下,各位有什么好的意见也发表一下


[此贴子已经被作者于2006-12-21 22:24:31编辑过]


雁无留踪之意,水无取影之心
2006-12-21 21:20
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
收藏
得分:0 
呵呵...好

我的msn: myfend@
2006-12-21 21:22
PcrazyC
Rank: 6Rank: 6
等 级:贵宾
威 望:29
帖 子:5652
专家分:0
注 册:2006-10-20
收藏
得分:0 
还有一个小问题讨论一下,我用ADODB对象模型的时候,没有出现焦点的问题

雁无留踪之意,水无取影之心
2006-12-21 21:41
快速回复:[求助]找不到文件
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.021239 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved