Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Chriss Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Recent content by ShadowFox333

  1. ShadowFox333

    Word Mail Merge Test field - Insert Text

    Thanks - I was able to create a nested IF statement to fix my problem but I was hoping to cerate a VBA function or Case statement to generate the description. In some cases I may have maybe 40 or 50 description's based on a code coming in on a xlsx file. That way I just need to modify or create...
  2. ShadowFox333

    Word Mail Merge Test field - Insert Text

    The code is contained within the mail merge source (merge field). What syntax do I use to use case to test a mail Merge field. Each letter will have a different code to convert to text.
  3. ShadowFox333

    Word Mail Merge Test field - Insert Text

    Doing a Mail Merge to a letter. input field contains 1, or 2 or 3 or 4. I want to print one of four description's based on input field code. If 1 print "yes" if 2 print "no" if 3 print "maybe" if 4 print "whatever". Not a simple if..then..else. VBA,Macro??? TIA Bob
  4. ShadowFox333

    Can you do an Excel Data Import using vbscript?

    Hello, I wrote a script that opens a csv file, sets all the cell columns to auto fit, edits the cell formats of certain columns, (zip to 5 zeroes so the leading zeroes don't get dropped) and then writes the file out as an excel spreadsheet. Is that something that could fit into what you are...
  5. ShadowFox333

    send email using vb

    Below is a .vbs file that sends an email with an attachment. The file is really a text file with a .vbs extension generated in a program that uses tables for email address and file names for attachments but the basic vbs code is there using MAPI. Hope this helps ~~Bob~~ Dim ToAddress Dim...
  6. ShadowFox333

    How Can I Run VBScript Without using A Browser

    Hey Skittle. The script below is a file called email.vbs. If you have windows scripting host installed (cscript) you can just double click on this file. I use MAPI. This script also attaches a .csv file Dim ToAddress Dim FromAddress Dim MessageSubject Dim MessageBody Dim MessageAttachment Dim...
  7. ShadowFox333

    Open Access MDB Run a query CLose MDB

    Is it possible to open an Access data base run a query and then just close the data base.
  8. ShadowFox333

    How to unzip a concatenated zipped file using PKUNZIP utility in MVS?

    when the files are concatinated instead of being (zipped zip files) there is zip file termination coding at the end of each file. So you may not be able to unzip the other files untill you can segregate the data. How big is the concatinated file?
  9. ShadowFox333

    Sending Email with CDO

    Here is one I create dynamically with another program to send using OUTLOOK/MAPI with an attachment. Enjoy. Dim ToAddress Dim FromAddress Dim MessageSubject Dim MessageBody Dim MessageAttachment Dim ol, ns, newMail ToAddress = "Someone@world.com" MessageSubject = "Office Stuff" MessageBody =...
  10. ShadowFox333

    Running regedit from a *.bat or *.cmd File

    I use this one every time I boot my machine. next few lines are the bat file ___________________________________________________________ echo off cls rem Note: this file merges tif-cln.reg to re-establish the RunOnce value start /w regedit.exe /s tif-cln.reg exit...
  11. ShadowFox333

    Sending a file name for printer output

    I have never been able to script the windows printer dialog box with any luck which is what you need to do here to pre-populate those parameters. I have been trying to write a script to turn on and turn off duplexing from a shortcut with no luck. If I run accross something I will let ya know.
  12. ShadowFox333

    Sending a file name for printer output

    Try this out. returncode=msgbox ("put some paper in the printer",65,"Print start") if returncode=1 then Set ss = CreateObject("WScript.Shell") ss.run "command /c notepad /p c:\rjm\test.rpt ",1,TRUE msgbox "Print is finished",64,"Print finished" end if set ss = nothing
  13. ShadowFox333

    Preserve file format from csv to xls

    Hi Malayagal, Below is a script I use to do what you want. On lines 42 and 43 the .numberformat= does what you want. Line 43 c:c is a zip code that does not drop the leading zeroes on New England states. Enjoy Bob Option Explicit Const vbNormal = 1 DIM objXL, objWb, objR ' Excel object...
  14. ShadowFox333

    pause or wait with batch script to process all information

    At the very beginning of the script use this assuming your file is named file.txt IF EXIST FILE.TXT DEL FILE.TXT Bob
  15. ShadowFox333

    pause or wait with batch script to process all information

    Yes, That should work. The reason the :Eof thing does not work is that :EOF when used as a goto tag causes an imediate exit and not a branch to a :Tag. If you change :EOF to :anything it should work Bob

Part and Inventory Search

Back
Top