Recent content by Babscoole

Using an Exabyte autoloader connected to a PCI-X Adaptec 29160 controller. I am upgrading to a brand new server with only PCIe, so will need a new one. Seems that the choices are very limited for PCIe SCSI. I've found two: LSI LSI20320IE and Adaptec 29320LPE, no 160 cards that I could find...

Cool. Thanks for the info. I guess Panasonic basically never updates their software then. Appreciate the quick response cwc3. :)

A few years back we got a KX-TD500. About a year after, the telecom guy we bought it from was closing shop and retiring. As a parting gift, he gave me a copy of the maintenance console software so that I could do simple stuff like swap extension numbers. It's labelled as V4M, Version 030912A...

Very cool. Looks to be working nicely. :) Now I just need to integrate this back into the HTA it's to live in and can (hopefully) close the books on this one.

At least I've now got the query to stop throwing errors, but now it tells me that the the record exists every time, even if it doesn't. Blah. Current code: On Error Resume Next Dim oConn, DBCaseFile, DBError, rs ' Set File Number to UnPurge DBCaseFile = "100000" Set oConn =...

Still can't get the query formatted correctly. Here's what the original query looks like in access: SELECT Case_TIFF_Files.CaseNumber FROM Case_TIFF_Files WHERE (((Case_TIFF_Files.CaseNumber)="351418")); Something about the formatting and adding "IF EXISTS(SELECT 'True' to the beginning...

Thanks you, I think that got it. Just for knowledge sake, I did start working on figuring out how to query if the entry already existed method and kept coming up with errors with the query. It's got to be a syntax problem, but I can't seem to get it right. What do I have or not have in here...

Running into an issue with a script I’ve been working on for some end-users, the relavant portion of which is pasted below. In a nutshell, the script calls a stored procedure (append query) in an access database. This query is moving a row from one table to another(source to destination)...

This check is looking for if the file already exists at the destination point, a separate check from if the source file even exists. If it does, then the script should end and not even bother trying to do the copy operation.I wouldn't think it would be necessary to have the script do a...

Everything don't now except for one thing, need to add back in one check: If fso.FileExists(destDir & file.name) Then MsgBox destDir & file.name & " already exists.", 0 WScript.Quit I think that I just need to do something like this: If findfile( "s:\FileBack", strCaseFile, file) Then If...

Good to know. As mentioned earlier, I'm converting a bunch of Kix scripts into VBS and then tying them all together in an HTA. Given that functions and subs can't be within subs, I'm just going to have to be careful and try to keep each script from having too many functions and subs otherwise...

OK, still have to add back in the user feedback stuff and the database stuff, but here is what is now working: dtmStart = Now() strCaseFile = InputBox("Enter the case number for the file to unpurge:" & Chr(13) & "(This may take several minutes. You will be prompted upon completion)","WLF...

Thanks, that did the trick. I didn't think about when the data was being generated. Quick question that I thought of for when this gets rolled into an HTA, can a function be within a sub? Here's what worked: Dim GoodFileCnt, BadFileCnt, GoodMsg, ErrorMsg Set objShell =...

Update. Unfortunately it didn't work, but I found another recursive search funtion, similar to yours, that I'm attempting to modify to suit my purpose. I'll post back when/if I get it running. :)

Thanks for the response mrmovie. I tried putting explorer.quit into the main, but for whatever reason, it wasn't closing the IE display window. I'm using IE to give feedback to the end-user that the script is running, since the file search could take up to 10 minutes. Probably would be...