老师您好! 我在单击某表的zzh单元格以后,创建了5个文件夹,想不退出操作直接分别建立相应的文件,这些文件类型都不同,有什么办法或在哪里写代码。原创建文件夹的语句已经有了:If e.Col.name = "编号" AndAlso e.Row.isnull("编号") = False Then
If FileSys.DirectoryExists(ProjectPath & e.Row("编号")) = False Then '如果目录不存在
FileSys.CreateDirectory(ProjectPath & e.Row("编号") & "\1-订单") '则创建之
FileSys.CreateDirectory(ProjectPath & e.Row("编号") & "\2-图纸") '则创建之
FileSys.CreateDirectory(ProjectPath & e.Row("编号") & "\3-合同") '则创建之
FileSys.CreateDirectory(ProjectPath & e.Row("编号") & "\4-装箱清单") '则创建之
FileSys.CreateDirectory(ProjectPath & e.Row("编号") & "\5-客户交流") '则创建
messagebox.show("建立完毕!")
Else
messagebox.show("已经建立!")
End If
End If
比如:如果点击装箱清单文件夹,直接进入进入报表模板设计或直接打开已有模块。如果点击合同就进入合同文件的编辑。