要的是真正的另存为,而不是复制再从剪贴版里读出的那种如以下代码:For Each x In WebSky.Document.All
        If x.tagName = "IMG" Then
                WebSky.Stop
                Set CtrlRange = WebSky.Document.body.createControlRange()
                CtrlRange.Add (x)
                CtrlRange.execCommand ("Copy")
               
                SavePicture Clipboard.GetData, gstrFileName
               
                'getCodeForSky
               
            End If
        End If
    Next不要这种的,如果在运行过程中正好要复制东西,就马上提提现出错退出!~所以要的是真正的下载另存!~
不这样可以实现吗???