如何根据网址路径创建目录文件夹?(50)

  • 主题发起人 主题发起人 macrolen
  • 开始时间 开始时间
M

macrolen

Unregistered / Unconfirmed
GUEST, unregistred user!
如何根据网址路径创建目录文件夹?哪位朋友写过这样的函数?如:http://www.it.com.cn/notebook/image/2009/12/23/11/index1_06.jpg想在电脑上建立相应目录:www.it.com.cn/notebook/image/...这样
 
str := 'http://www.it.com.cn/notebook/image/2009/12/23/11/index1_06.jpg'str := stringreplace(str, 'http://','', [rfReplaceAll]);str := stringreplace(str, '/', '/', [rfReplaceAll]);str := 'D:/' + str ;sPath := ExtractFilePath(str);if not DirectoryExists(sPath) then ForceDirectories(sPath)合适就结贴吧。
 
感谢~结贴!
 
后退
顶部