reachtone 老师请进～【ok 了】 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

您的以excel文件作为数据源的例子的按钮代码中
          ts = ts & s.Replace("$","").Trim("'") & "|"      改为：
          ts = ts & dlg.FileName.split("\")(dlg.FileName.split("-:special:1:-).length-1) & " 中的表: " & s.Replace("$","").Trim("'") & "|"

后

会发现：在同一数据源下，选择不同的Excel工作簿，都会提示“xx数据源已经存在”，但是ListBox中显示的是：不同的工作簿名和第一次显示的第一个工作簿的表名。总感觉～   说不出的味道。
既然提示了，怎样保持原工作簿和表名不变？也就是怎样判断数据源已经存在呢？提示之后不执行代码向ListBos写东西了。
上面怎么会乱码呢：

图片点击可在新窗口打开查看

此主题相关图片如下：未命名.jpg

[此贴子已经被作者于2010-1-28 0:01:37编辑过]

主题：reachtone 老师请进 ～ 【ok 了】

主题：reachtone 老师请进～【ok 了】