大侠帮忙看看那儿有问题

a8lquattro 2010-09-02 09:03:41
vb.net入门经典里面的一个例子,按照书本的写入以下代码,报了参数太多的错误,大家帮我看看问题出在哪儿,谢谢!
Imports System.IO
Public Class Favorite
Public FavoritesCollection As WebFavoriteCollection
Public ReadOnly Property FavoritesFolder() As String
Get
Return Environment.GetFolderPath(Environment.SpecialFolder.Favorites)
End Get
End Property
Public Sub ScanFavorties(ByVal folderName As String)
If FavoritesCollection Is Nothing Then FavoritesCollection = New WebFavoriteCollection()
Dim objScanFolder As New DirectoryInfo(folderName)
Dim objFavoriteFile As FileInfo
For Each objFavoriteFile In objScanFolder.GetFiles
If String.Compare(objFavoriteFile.Extension, ".url", True) = 0 Then
Dim objWebFavorite As New WebFavorite()
objWebFavorite.Load(objFavoriteFile)
FavoritesCollection.Add(objWebFavorite)
End If
Next
End Sub
Public Sub ScanFavorites()
ScanFavorites(FavoritesFolder)
End Sub
End Class

其中vb.net编译会报Public Sub ScanFavorites()参数太多,并且在ScanFavorites(FavoritesFolder)中的FavoritesFolder下面用曲线表示
...全文
72 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
Peter200694013 2010-09-02
  • 打赏
  • 举报
回复
[Quote=引用 3 楼 wuyazhe 的回复:]
另外,你知道么,csdn发帖提问后,如果有了答案,需要点上面的结贴来完成这个话题。
你结贴率为0,估计是刚注册不了解。欢迎来到csdn。
[/Quote]
要记得结贴...
SeeSunSet 2010-09-02
  • 打赏
  • 举报
回复
楼主要加油啊.就这个水平如何调试大程序啊..
兔子-顾问 2010-09-02
  • 打赏
  • 举报
回复
另外,你知道么,csdn发帖提问后,如果有了答案,需要点上面的结贴来完成这个话题。
你结贴率为0,估计是刚注册不了解。欢迎来到csdn。
a8lquattro 2010-09-02
  • 打赏
  • 举报
回复
[Quote=引用 1 楼 wuyazhe 的回复:]
ScanFavorties和ScanFavorites你希望写函数重载么?
你单词写错了,i和t反了。

ScanFavorties
ScanFavorites
[/Quote]

晕死,我这眼力,我怎么看都觉得对的。的确是想写函数重载来实现获取收藏夹目录的功能。
兔子-顾问 2010-09-02
  • 打赏
  • 举报
回复
ScanFavorties和ScanFavorites你希望写函数重载么?
你单词写错了,i和t反了。

ScanFavorties
ScanFavorites
整合FileDisk和Filemon的MFC开源码,希望对新手有帮助! 说明:对大侠们可能没什么价值,仅以此献给像我一样的菜鸟! 软件环境和框架: 1.软件环境:VS.net2003 + XP IFS + DS3.2 2.框架:采用MFC框架; 功能: 1.自动加载FileDisk和Filemon的驱动程序部分; 2.用FileDisk生成一个虚拟硬盘,并自动分配盘符; 3.对新生成的虚拟盘符挂接Filemon的过滤驱动; 4.退出时自动卸载FileDisk和Filemon驱动; 不完善的地方(有兴趣的朋友可以完善下,并希望完善后请在我这里跟帖上传源码,就算是对我开源的支持,谢谢!): 1.FileDisk生成的虚拟硬盘需要先手动在资源管理器里进行格式化;可以在程序里调用SHFormat之类的启动格式化窗口进行改善,也可以使用第三方提供的格式化函数进行格式化; 2.Filemon目前是应用程序使用按照时间来进行查询的过滤方式,希望能改成驱动程序主动通知应用程序。 ------- 整理后面的回贴后追加的内容 ---------------- 1.在BOOL CMainFrame::Init(void)函数里有段网络通讯的代码,里面访问了我自己建的局域网服务器,大家那里应该是没有的,所以会报错,不好意思!注释或删掉以下内容就好了! CWebWrapper clsWebWrapper; CHttpDataPackage_Receive HttpData_Receive; //Call server function if (clsWebWrapper.PostCommand( _T(""), _T("abcd我你他"), &HttpData_Receive, _T("WebGrab"), this, FALSE, FALSE)) //if (clsWebWrapper.GetCommand( _T(""), _T("abcd我你他"), &HttpData_Receive, // _T("WebGrab"), this, FALSE, FALSE)) { AfxMessageBox(HttpData_Receive.GetContent_DataAll()); } else { AfxMessageBox("网络通讯失败"); return FALSE; } 2.大家如果想看文件过滤出来的信息,可以在BOOL CMainFrame::Init(void)函数里去掉对这句话//m_nTimer = SetTimer( 1, 500/*ms*/, NULL );的注释,那就相当于启动了定时器,然后会有信息显示在子窗口里,,当然我并没有去实现子窗口的滚动,所以子窗口里的内容满了后,就看不到最新的信息了,,哈哈,,我实在是没时间啊,,公司里的项目这2天在出演示版呢,,,忙啊。。。。大家自己加加代码哈,,,这也是个不完善的地方,希望完善了的朋友,,上传下代码啊,,,多谢! 3.另外,请下载使用了的朋友,有空的话来帮忙说下使用上有没有问题啊,如果有问题,我好及时做修改啊,谢谢了!如果可以用的话,有空就帮忙回个贴,说可以用,这样别的朋友就知道这个代码是可以用的,免得大家还以为下了个不能用的东东,那不是郁闷死了!先谢谢了! ------------- 最新补充说明 ------------------- 1.FileDisk和Filemon我用的都是比较老的版本了,FileDisk是2004年的,Filemon是4.34 ;FileDisk的作者在其网站上已经出了新版本了,是2006年的,我下载了,还没时间看过,所以大家有空也可以整合2006的驱动来替换我的老版本,毕竟老版本是可能有些不完善的地方的;而Filemon则没有再继续开放源码,,所以如果有朋友有幸获得了新版本的源码,能不能上传个,,多谢了! 2.Filemon.exe会自动在其目录下创建File.img文件做为虚拟磁盘使用的文件,大家只要手动格式化一次创建出来的虚拟磁盘,以后就不用再格式化,可以不断使用了,所以以后大家要是做成产品的话,可以直接把已经格式化好的对应的File.img文件一起打包到安装包里,呵呵! 3.我放弃了FileDisk中对CDROM部分的支持,以及Filemon中对Win9x的VxD驱动的支持,如果有朋友需要的话,可以自行添加!

16,718

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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