Foxtable(狐表)用户栏目专家坐堂 → 老大,请帮做个例子学习一下


  共有17983人关注过本帖树形打印复制链接

主题:老大,请帮做个例子学习一下

帅哥哟,离线,有人找我吗?
jacob
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:47 积分:455 威望:0 精华:0 注册:2011/3/24 17:10:00
老大,请帮做个例子学习一下  发帖心情 Post By:2011/5/14 15:51:00 [只看该作者]

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:test.rar

1、加载成功,如何在 Lbinfo 标签显示代码

2、把accdb  登录名加到 用户名 Combobox中

3、窗体判断不符合条件 Exit Sub 用什么代替?

 

建议老大命令函数与 VB高度一致,以免我们脑筋崩溃。


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/5/14 16:23:00 [只看该作者]

Dim CNN As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=c:\test\AAA.accdb;Jet OLEDB:Database Password=y16788shhgHK"
If Connections.TryConnect(CNN) = False Then
    MessageBox.Show("数据源无法连通!")
Else
    Connections.Add("test",cnn)
    Dim cmd As New SQLCommand
    cmd.Connection Name = "test"
    cmd.CommandText = "Select 登录名 From {登录信息} Where 登录名 Is Not Null"
    Dim dt As DataTable = cmd.ExecuteReader
    e.Form.Controls("CbUser").ComboList = dt.GetComboListString("登录名")
    e.Form.Controls("LbInfo").Text = "本地数据库连接成功!"
End If

 

呵呵,你给我的印象就是不怎么看帮助,直接动手的,否则怎么可能今时今日了,还不知道如何设置标签的显示内容呢?

[此贴子已经被作者于2011-5-14 16:25:38编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/5/14 16:25:00 [只看该作者]

注意

1、

 

cmd.Connection Name = "test"

 

connction Name中间的空格是多余的,实际使用过的时候去掉,因为论坛会屏蔽没有空格的这个单词

 

2、我代码中的数据文件路径有变化,你改回你原来的。

[此贴子已经被作者于2011-5-14 16:28:36编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/5/14 16:31:00 [只看该作者]

可以这样改一下,使用相对路径,这样随便你复制到任何位置,都能正常运行:

 

Dim CNN As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & ProjectPath & "AAA.accdb;Jet OLEDB:Database Password=y16788shhgHK"
If Connections.TryConnect(CNN) = False Then
    MessageBox.Show("数据源无法连通!")
Else
    Connections.Add("test",cnn)
    Dim cmd As New SQLCommand
    cmd.Connection Name = "test"
    cmd.CommandText = "Select 登录名 From {登录信息} Where 登录名 Is Not Null"
    Dim dt As DataTable = cmd.ExecuteReader
    e.Form.Controls("CbUser").ComboList = dt.GetComboListString("登录名")
    e.Form.Controls("LbInfo").Text = "本地数据库连接成功!"
End If

 

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:test.rar

[此贴子已经被作者于2011-5-14 16:32:20编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
jacob
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:47 积分:455 威望:0 精华:0 注册:2011/3/24 17:10:00
  发帖心情 Post By:2011/5/14 17:04:00 [只看该作者]

从头看起很累,帮助里面找不到头绪,最好有个与VB区别的对照表,或者做成VB那种帮助模式。 还是谢谢老大,周末辛苦啦

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/5/14 19:33:00 [只看该作者]

呵呵,其实Foxtable的帮助比vb的帮助体贴多了,VB的帮助看起来更累的。

建议你至少要看三遍帮助才动手,从使用指南开始看,foxtable经过上千用户两年半时间的测试,其内涵虽然比不上vs.net那么博大精深,但也远没有你想象得那么肤浅,你现在的问题是不肯看帮助,一旦遇到问题,就开始觉得foxtable不行,这即浪费了你的时间,对foxtable也不那么公平的。

 

[此贴子已经被作者于2011-5-14 20:49:53编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
zhb0058
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:1 积分:65 威望:0 精华:0 注册:2011/5/15 0:06:00
  发帖心情 Post By:2011/5/15 0:09:00 [只看该作者]

是的是的

 回到顶部
帅哥哟,离线,有人找我吗?
shinja
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:5 积分:91 威望:0 精华:0 注册:2011/5/14 21:10:00
  发帖心情 Post By:2011/5/15 6:47:00 [只看该作者]

帮助系统做的太差!! 我本来想用这个自己做一个进销存系统的。连最基本的运算都不知道在哪里找帮助。 我有access 开发经验,vba也接触过。

 

你这个软件是不错,但是帮助太差!该说的没说清楚,自我膨胀的演示一大堆。毫无意义!最好有例子,有视频。你这是个全新的一套系统,怎么能没有从头到尾的细致帮助呢?现代人很忙,找到你这里来都是想躲懒的家伙。自我学习的代价太大的话就没有意义了。


 回到顶部
帅哥哟,离线,有人找我吗?
jacob
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:47 积分:455 威望:0 精华:0 注册:2011/3/24 17:10:00
  发帖心情 Post By:2011/5/15 7:51:00 [只看该作者]

以下是引用shinja在2011-5-15 6:47:00的发言:

帮助系统做的太差!! 我本来想用这个自己做一个进销存系统的。连最基本的运算都不知道在哪里找帮助。 我有access 开发经验,vba也接触过。

 

你这个软件是不错,但是帮助太差!该说的没说清楚,自我膨胀的演示一大堆。毫无意义!最好有例子,有视频。你这是个全新的一套系统,怎么能没有从头到尾的细致帮助呢?现代人很忙,找到你这里来都是想躲懒的家伙。自我学习的代价太大的话就没有意义了。

同感!我以前也用 Access VBA,尽然无处下手,最近 看了一下 Vb.net ,感觉还容易上手点,只是所有的代码重写.

 回到顶部
帅哥哟,离线,有人找我吗?
jacob
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:47 积分:455 威望:0 精华:0 注册:2011/3/24 17:10:00
  发帖心情 Post By:2011/5/15 7:57:00 [只看该作者]

ACCESS 以前版本安全性不太好,2010的总算放心了点,而且VBA优点 OFFICE之间兼容性比较好,编写EXCEL也容易上手

 回到顶部
总数 27 1 2 3 下一页