怎么把一个目录下的所有文件 ,显示在一个ComboBox 控件中?还有几个关于RecordSet 和SQL的问题大家来看看看?后天结贴,一定!

fzhfeng 2002-06-05 01:34:10
我有一个空表,当用MyRecord.moveFirst时出错了,
还有就是myRecord![fieldname].value= textBox1.text来更新,说无效的使用Null?
还有不知道怎么回事纪录不能正常的滚动myRecord.moveXXXX 不能到数据。

另一个是在FileListBox中,测试有一个相同的文件
for i=0 To FileList1.listCount
If filename= fileList1.list(i) The
MsgBox(...)
Then
Next i
怎么不行呀?

另一个,CommonDialog1.showOpen
CommonDialog1.Action= ? 得到双击了取消按钮?

打开一个数据库,然后,建一张临时表,从库里的几个表里select一些纪录组成
这个新表,但是那么几个表的结构不同,
还有就是,怎么在一个select句子里,表的名字用一个字串,做参数和一个控件的。Text属性邦定?


mySQL = "select top" '"&txrCount.Text&"' *
"From" '"&tablename&"'
"Where" (field= '"&txt1.Text&"",'"&txt2.Text&"');"
老师说我语句没结束,怎么回事呀?
提示处在'"&txt1.Text&"",'"&txt2.Text&"'的逗号哪。
...全文
39 6 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
fzhfeng 2002-06-05
  • 打赏
  • 举报
回复
我回去试试
thanks
tomjoule 2002-06-05
  • 打赏
  • 举报
回复
movefirst是对有记录用的,用之前最好判断:if not rs.eof then rs.movefirst
softrain 2002-06-05
  • 打赏
  • 举报
回复
用filesystemobject对象可以,写一个递归函数.
我以前写过,你可以搜索一下,应该能找到.
rushing 2002-06-05
  • 打赏
  • 举报
回复
结合使用dir和file控件。
把目标路径赋值给它,然后查其数组就行了。
孙小雄 2002-06-05
  • 打赏
  • 举报
回复
Private Sub Command1_Click()
Combo1.Clear
File1.Path = "c:\"
For i = 0 To File1.ListCount - 1
Combo1.AddItem File1.List(i)
Next
End Sub

Private Sub Form_Load()
With File1
.Visible = False
.System = True
.Hidden = True
.Normal = True
End With
End Sub
daryl715 2002-06-05
  • 打赏
  • 举报
回复
你的数据库中没有数据
会导致movefirst出错

1,453

社区成员

发帖
与我相关
我的任务
社区描述
VB 控件
社区管理员
  • 控件
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧