Re: CopyHere

Tech-Archive recommends: Repair Windows Errors & Optimize Windows Performance


"James" <dontemailme@xxxxxxxxxxxxxxx> wrote in message news:ObwadLRIKHA.3000@xxxxxxxxxxxxxxxxxxxxxxx
This is what I had...

On Error Resume Next
If Err.Number <> 0 Then
msgbox Err.Number
msgbox Err.Description
End If

If an error occurred before the above block of code, and if no previous on error resume next was in effect, the above code would never execute, as the script would abort with an error message.

If an error did not occur before the above block of code, I am not sure what error condition would be displayed here.

/Al

"Eric" <someone@xxxxxxxxxxxxxxxxx> wrote in message news:uByyApPIKHA.1336@xxxxxxxxxxxxxxxxxxxxxxx
What sort of error checking gives a message of "450"?
Normally if you want to continue on error and see what the error was you do:

On Error Resume Next
' do something which crashes sometimes
If Err.Number <> 0 Then
Wscript.Echo Err.Description
End If

"James" <dontemailme@xxxxxxxxxxxxxxx> wrote in message news:eO992kPIKHA.1988@xxxxxxxxxxxxxxxxxxxxxxx
You're my savior Eric...LOL

I have definately shown my newbness, but thanks for reading between the lines and teaching me the answer to what seems to be such an easy answer now. I tried adding the error checking but all it did was give me the 450 error number, and not much I could do with that since I didn't know what to do in the first place.

Thanks a ton Eric!

James

"Eric" <someone@xxxxxxxxxxxxxxxxx> wrote in message news:er3n1HPIKHA.1340@xxxxxxxxxxxxxxxxxxxxxxx
If you can specify more than one at a time, you don't pass them as separate parameters. You have to combine them.
If you want option 8 and option 16 you pass value 24 not 8,16.
This is why the option values are multiplied numbers.

"James" <dontemailme@xxxxxxxxxxxxxxx> wrote in message news:eLMw0ZOIKHA.3444@xxxxxxxxxxxxxxxxxxxxxxx
The following options work...but I cannot use specify more than one at a time or the complete copy will fail. Anyone know why?

Const FOF_NOCONFIRMATION = &H10& '(16)Respond with "Yes to All" for any dialog box that is displayed
Const FOF_SIMPLEPROGRESS = &H100& '(256)Display a progress dialog box but do not show the file names
Const FOF_NOCONFIRMMKDIR = &H200& '(512)Do not confirm the creation of a new directory if the operation requires one to be created

objSHApp.Namespace(strDest).CopyHere strSrcFavs,FOF_NOCONFIRMATION,FOF_SIMPLEPROGRESS,FOF_NOCONFIRMMKDIR

James

"Eric" <someone@xxxxxxxxxxxxxxxxx> wrote in message news:eHK7rHEIKHA.1340@xxxxxxxxxxxxxxxxxxxxxxx
MS says CopyHere has options.
http://msdn.microsoft.com/en-us/library/bb787866(VS.85).aspx
I execute it with options and it ignores them. Am I missing something or is MS missing something?














.

Relevant Pages

  • RE: Do not allow form to close on validation error
    ... Private Sub Form_BeforeUpdate ... MsgBox "A Value for 'Deficiency Source' is Required.", vbOKOnly, ... "Required Value Missing" ... MsgBox "A Value for 'Deficiency Description' is Required.", vbOKOnly, ...
    (microsoft.public.access.formscoding)
  • RE: Do not allow form to close on validation error
    ... MsgBox "A Value for 'Deficiency Source' is Required.", vbOKOnly, ... "Required Value Missing" ... MsgBox "A Value for 'Deficiency Description' is Required.", vbOKOnly, ... MsgBox "A Value for 'Validation Indicator/Exit Criteria' is Required.", ...
    (microsoft.public.access.formscoding)
  • Reading text files with ADO - missing record
    ... Const adLockOptimistic = 3 ... Set adoConnection = CreateObject ... Set adoRecordset = CreateObject ... MsgBox!QLINES ...
    (microsoft.public.vb.database.ado)
  • Re: Get next empty Column?
    ... I omitted to qualify the code to refer to Sheet2: ... "Norman Jones" wrote in message ... > Hi James, ... > MsgBox Rng.Address ...
    (microsoft.public.excel.programming)
  • Re: How to connect to database?
    ... Const adOpenForwardOnly As Long = 0 ... Dim sConnect As String ... Dim sSQL As String ... MsgBox "No records returned.", vbCritical ...
    (microsoft.public.excel.worksheet.functions)