如何写asp的类

来源:百度知道 编辑:UC知道 时间:2024/05/23 11:36:02
Property Let到底应该怎样用啊
比如我通过实例定义obj.val=1,怎样使类的过程内能够val的这个值

<%
Dim MyFileFolder
Set MyFileFolder = New FileFolderCls
'Response.Write MyFileFolder.MoveAFile("f:\123\4561.exe","f:\123\4562.txt")
'Response.Write MyFileFolder.MoveAFolder("f:\456","f:\ditg\456")
'Response.Write MyFileFolder.ShowFileSystemType("i:\")
'Response.Write MyFileFolder.CopyAFile("f:\123\4562.txt","f:\123\4563.txt")
'!!!!
'Response.Write MyFileFolder.CopyAFolder("f:\123\","f:\789\")
'Response.Write MyFileFolder.ShowFolderList("f:\ditg")
'Response.Write MyFileFolder.ShowFileList("f:\123\123")
'Response.Write MyFileFolder.DeleteAFile("f:\123\4562.txt")
'Response.Write MyFileFolder.DeleteAFolder("f:\456\")
'Response.Write MyFileFolder.CreateFolder