as requested, attached is the complete script I was playing with.
As you can see I've just added a loop to the top of Skwires script to check for the existence of file save dialogs...
you should be able to use save in lieue of save as, though I haven't played with this
it also occurs to me that there is no need to destroy the gui each time as hide/show has the same effect. The bonus with this is that the last use is persistent, ie you can see the last entry (note that this could be coded in anyway)
#singleinstance
Loop
{
ifwinactive, Save As ;should work with just save, but i haven't tried it - note that you would need to change the other instances as well
{
gosub filename
winwaitclose, Save As
}
ifwinnotexist, Save As
gui, destroy
Sleep, 1500
}
FileName:
^t::
{
Gui, Margin, 0, 0
Gui, Add, MonthCal , xm+0 ym+0 w185 h160 Border vMyCalendar gOnClick ,
Gui, Add, Text , xm+185 ym+5 w70 h20 Right 0x200 , Reference #:
Gui, Add, Edit , xm+260 ym+5 w50 h20 vRefNo gOnClick ,
Gui, Add, Text , xm+315 ym+5 w65 h20 Right 0x200 Number , Sequence #:
Gui, Add, Edit , xm+385 ym+5 w20 h20 vSeq gOnClick ,
Gui, Add, Text , xm+190 ym+30 w200 h20 0x200 , Document Orgination And Ownership:
Gui, Add, DropDownList, xm+190 ym+50 w250 h150 vOwnership gOnClick , Vendor||Company|Client|Other
Gui, Add, Text , xm+190 ym+75 w200 h20 0x200 , Document Type:
Gui, Add, DropDownList, xm+190 ym+95 w250 h150 vDocumentType gOnClick , Invoice||Packing Slip|Purchase Order|Work Order|Check|Proofing Document|Film|Drop Ship Document
Gui, Add, Text , xm+190 ym+120 w200 h20 0x200 , Initial Routing Direction:
Gui, Add, DropDownList, xm+190 ym+140 w250 h150 vDirection gOnClick , Sent Out||Returned To Company|File Only
Gui, Add, Button , xm+370 ym+165 w70 h20 gClipboard, Clipboard
Gui, Add, StatusBar
SB_SetText( "Ready.", 1 )
Gui, Show, AutoSize, Filename Standardiser
}
Return
OnClick:
{
Gui, Submit, NoHide ; Get current variable values.
; Handle "Document Orgination And Ownership" DDL.
If ( Ownership = "Vendor" )
{
myAbbr1 := "V"
}
Else If ( Ownership = "Company" )
{
myAbbr1 := "P"
}
Else If ( Ownership = "Client" )
{
myAbbr1 := "C"
}
Else If ( Ownership = "Other" )
{
myAbbr1 := "O"
}
; Handle "Document Type" DDL.
If ( DocumentType = "Invoice" )
{
myAbbr2 := "IN"
}
Else If ( DocumentType = "Packing Slip" )
{
myAbbr2 := "PS"
}
Else If ( DocumentType = "Purchase Order" )
{
myAbbr2 := "PO"
}
Else If ( DocumentType = "Work Order" )
{
myAbbr2 := "WO"
}
Else If ( DocumentType = "Check" )
{
myAbbr2 := "CK"
}
Else If ( DocumentType = "Proofing Document" )
{
myAbbr2 := "PD"
}
Else If ( DocumentType = "Film" )
{
myAbbr2 := "FF"
}
Else If ( DocumentType = "Drop Ship Document" )
{
myAbbr2 := "DS"
}
; Handle "Initial Routing Direction" DDL.
If ( Direction = "Sent Out" )
{
myAbbr3 := "S"
}
Else If ( Direction = "Returned To Company" )
{
myAbbr3 := "R"
}
Else If ( Direction = "File Only" )
{
myAbbr3 := "F"
}
; Format calendar to chosen datestamp.
FormatTime, myDate, % MyCalendar, yyyy-MM-dd
; Replace spaces with underscores if necessary.
StringReplace, Ownership , Ownership , %A_Space%, _, All
StringReplace, DocumentType, DocumentType, %A_Space%, _, All
StringReplace, Direction , Direction , %A_Space%, _, All
; Build filename from user input.
myFilename := RefNo . "_" . Seq . "_-_(" . myAbbr1 . myAbbr2 . myAbbr3 . ")_" . Ownership . "_" . DocumentType . "_" . Direction . "_" . myDate
; Populate filename field.
SB_SetText( myFilename, 1 )
}
Return
Clipboard:
{
Clipboard := myFilename
SB_SetText( "Filename copied to clipboard.", 1 )
Sleep, 1500
SB_SetText( myFilename, 1 )
}
Return
GuiClose:
GuiEscape:
{
Gui, Destroy
}
Return
Recent Posts
But again, so what is the problem exactly? Is it that you have to spend x minutes longer than necessary sending the mail in several parts, is it that the emails take y minutes longer to reach their destinations waiting for the security team to release the oversized attachment, is it that you have to pay $/£/€/ z more in internet bandwidth? You say that these are causing you PITA - just how does that P manifest itself?
) the settings are preconfigured and locked down so even if the users were interested AND knew what they needed to do, they can't, which means we end users get stuck with something that is badly bloated and unwieldy... which will compress Word documents with pictures and tables to a small fraction of the original file size and maintain pretty good resolution. These can be saved as compressed Office files or converted into much smaller PDF's than would have occurred with the original file.
.
- many thanks!