I want to be able to upload the html version of a visio document, but I am having alot of trouble. I have no problem uploading a .vsd file or an .htm file, the problem is that when you save a .vsd file as an .htm file it generates multiple pages. I don't want to have to track down every page that it generates (which can be alot!!!) and upload each individual one. What I would like to do is upload a visio doc and change it to html. I used the following code:
Code:
contenttype = objUpload.Files.Item(1).ContentType
contenttype = Trim(contenttype)
origfilename = objUpload.Files.Item(1).FileNamecontenttype
if contenttype = "application/vnd.visio" then
origfilename = Replace(origfilename, ".vsd" , ".htm")
objFile.SaveAs finaldir&origfilename
end if
[code]
This did save the file as an html however the page consisted of a whole lot of nonsense characters, and did not generate all the pages that visio usually generates. If anyone has any suggestions I would really appreciate it!!!
-Nina
replace(Life,"failure","Success",0,Forever)