Save As ASP – getting the file name (2002)

Topic

New Reply

I’m trying to write a macro to save a file as an ASP. How do I
obtain the “current” name of the file, or should i generate one?

      'Loop through all open pages
      Dim url As String
      For Each page In ActiveWebWindow.PageWindows
          page.Activate
          '***  Generate file name here?
          '
          page.SaveAs url
      Next

Reply | Quote

Replies

After some trial and error, something that sorta works…

        Dim name as String
        For Each myPageWindow In ActiveWebWindow.PageWindows
            myPageWindow.Activate
            If myPageWindow.IsDirty Then
                name = myPageWindow.Document.Title & ".asp"
                myPageWindow.SaveAs name
            End If
        Next

Reply | Quote