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 Rhinorhino on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
-
Referencing a specific folder in a folder colection
built in folder processor is most suitable, but for general purpose, here is another variation for vbscript: function collection_item(col_mycollection,index) dim i,c i=1 for each c in col_mycollection if i=index then collection_item=c exit for end if i=i+1 next... -
control impact printer
what is exact problem? 1) you need to connect to printer (watch line breaks): Set objFS = CreateObject("Scripting.FileSystemObject") Set objWSHNet = CreateObject("WScript.Network") objWSHNet.AddPrinterConnection "LPT1", strPrinterPath, False, strUsername, strPassword Set objPrinter =... -
control impact printer
what do you mean "impact"? is it "daisy wheel" printer? is it connected to serial port? if yes, it is then *pure* text_only printer, just select one from win printers, at printers setting tab. -
Referencing a specific folder in a folder colection
it seems vbscript does't support real collections, so there is no "key()" method. my closest solution could be filtered "for each ...": cnt=0 for each f in sf if cnt>= cnt_last then 'procede with next elements ... cnt_last=cnt_last+1 end if if cnt_last>cnt_max then 'exit loop...
