|
VB link Database(MS Access) 初学--解决了!希望会VB的,进来讨论讨论。
[复制链接]
|
|
楼主 |
发表于 24-11-2005 06:55 PM
|
显示全部楼层
|
|
|
|
|
|
|
发表于 27-11-2005 07:13 PM
|
显示全部楼层
原帖由 杨大侠 于 24-11-2005 06:55 PM 发表
我学VB才不到两个月。VB没有我想象中那么容易。
因为有很多object,很多properties要去弄明白。
Built-in function很多,可是有些很难懂。
我之前学过C和Java。
第一次与GUI接触的是用java。
Java codin ...
Java coding很麻烦,但syntax不难,跟C很像。
跟C很像,你作的应该是console application吧?有没有试过用java来作中文字的或GUI interface吧?如果有的话,没作到吐血才怪!
其实,VB并不是你想像中的那么难学。他只是易学难精吧了。
不然的话,就不会有人把它比喻成“玩具语言”。
你知道吗?我自创的第一电脑病毒(也是唯一的一个)就是用word里VBA制作出来的。当时我是在没有任何help file,朋友,参考书和search engine的帮助下完成的!
我觉得你把VB想像的这么困难,是因为你不知道那些keyword有什么作用。
你用的是VB6吧?其实,VB6已经趋向object oriented了,只要知道什么object有什么method和property就可以了。而且,VB里有一个automember的功能可以迅速的知道那个object有什么method和property。
keyword难懂?你可以用help file或MSDN来解决。
吧cursor放在那个keyword,然后按F1就可以知道那个keyword的意思了。
如果没有help file或MSDN,你也可以用object browser。在object browser里也有提供一些object的讯息。 |
|
|
|
|
|
|
|
发表于 27-11-2005 07:27 PM
|
显示全部楼层
原帖由 杨大侠 于 24-11-2005 12:35 AM 发表
问题解决了。。。
coding没有错,只是。。。
原来,link database拿data是要有条件的。
除了build connection string,set record sorce,。。。
还要在form里加一个textbox,link database里的data。
这 ...
还要在form里加一个textbox,link database里的data?
我有试过你的coding,不需要那个“无用”textbox,也没有问题啊。没放上那个多于的textbox,coding也可以跑。这一点我很不明白。
还有,像goatstudio说的,你不需要用到adodc这个activeX control,因为你没用到bound data。
只需要用DAO或ADO这两个libraries。你用adodc当然没有错,只不过比较多于。因为还需要把这个adodc hide起来。
在VB里用Database,你需要连接那个Database,然后开启你的table或recordset。
所以,你就需要有open connection或connection string来连接database。然后你的recordsource就要放database的table或SQL command。 |
|
|
|
|
|
|
|
发表于 27-11-2005 07:31 PM
|
显示全部楼层
其实,我觉得楼主并不是不想学,而是他真的不会。
叫他用search engine来找资料,只会得到无用的coding,因为他很多基本的keyword都不会。
最后得到的都是毫无意义的东西。这是我个人认为,不知道你们同意吗?
给楼主的话:
楼主有什么问题都可以尽量问,但是楼主本身也需要努力,所谓一分耕耘一分收获,像你很多VB的keyword不会,也需要把它弄熟,毕竟学好一个语言也不是一朝一夕的事。 |
|
|
|
|
|
|
|
发表于 14-12-2005 09:11 AM
|
显示全部楼层
最简单的解决方法就是你把你的source and DB 上载在一个地方,让大家去下载,然后就很简单明白你的问题所在,
我介绍你一个网站可以上载的
www.zupload.com,这个网站很好用的,好好利用它吧!! |
|
|
|
|
|
|
|
发表于 23-12-2005 09:22 PM
|
显示全部楼层
不知道楼主是不是解决了,但是如果你是和我一样拿tarc的windows programming,你可以看看你chapter 10的notes,我记得那便有一部分是说SQL的
今天刚刚帮我的group member搞Login system,这个是该module里面相关的coding
- '
- ' Global Variables
- '
- Public gadoCon As ADODB.Connection
- Public gadoRS As ADODB.Recordset
- Public gstrSQL As String
- 'Type Def
- Type UserData
-
- Name As String
- ID As String
- Level As Integer
-
- End Type
-
- Public gUserInfo As UserData
- '
- ' sub main
- ' this store the main flow of the program
- '
- Sub Main()
- ' Create connection object
- Set gadoCon = New ADODB.Connection
- Set gadoRS = New ADODB.Recordset
-
- ' declaring connection instruction
- gadoCon.ConnectionString = "Provider = Microsoft.Jet.OLEDB.4.0;" & _
- "Persist Security Info = False;" & _
- "Data Source = " & App.Path & "\Up2U.mdb;" & _
- "Mode = readwrite"
-
- ' Open connection
- gadoCon.Open
- End Sub
- '
- ' Login()
- ' all login data will be sent here for further processing
- ' return User Level
- '
- Public Sub Login(UserID As String, Password As String)
- ' Checked whether the user is already logged in
- If gUserInfo.Level = 0 Then
-
- ' perform checking here
- gstrSQL = "SELECT * FROM Members WHERE USER_ID = '" & UserID & "' AND USER_PASSWORD = '" & Password & "';"
-
- gadoRS.Open gstrSQL, gadoCon, adOpenDynamic, adLockReadOnly
-
- If gadoRS.EOF = True Then
-
- ' unable to find
-
- Else
-
- ' able to find
- gUserInfo.ID = gadoRS![USER_ID]
- gUserInfo.Level = gadoRS![USER_LVL]
-
- End If
-
- gadoRS.Close
-
- End If
- End Sub
复制代码
可惜因为整个structure的问题我需要重新整理一下
不过上面的coding基本上可以跑的,但是有些东西还未完整
希望楼主还没交asgm吧,因为按schedule来说,这个星期已经是要present了 |
|
|
|
|
|
|
| |
本周最热论坛帖子
|