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 TouchToneTommy on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  • Users: vzachin
  • Content: Threads
  • Order by date
  1. vzachin

    DLQ question

    hi, is there a way to have a default value in a TextBox, eg TextBox 15, 75, 40, 13, .text1 where i have a default value of BLUE, then the user can either overtype it with something else or leave it BLUE? thanks zach
  2. vzachin

    On Error question

    hi, when my script is running past midnight, i get logged out of Extra. it may take a few hours before the mainframe is back up and running. is there a way to have my script wait until Extra is back up? i would need to log into the system again. i was thinking i can use the On Error statement...
  3. vzachin

    saving a READ ONLY file

    hi i have a read-only file that i'm trying to save but i'm getting an error message "object value is set to nothing" Dim xl As Object, xl_workbook As Object, xl_sheet As Object Set xl = CreateObject("excel.application") xl.Visible = True xl.Workbooks.Open...
  4. vzachin

    calculate time difference

    hi, i need to calculate the time difference in hours between two dates that also has the hours. the data is formatted as follows: 02/04/10 15:00 Dim Sessions, System As Object, Sess0 As Object,Sess As Object Set System = CreateObject("EXTRA.System") Set Sessions =...
  5. vzachin

    array question

    hi i have a line of data with fields of various lengths that i need to extract. each field varies in length and are separated by spaces (could be one or more spaces): eg: XXXXXXXX XXXXXX XXXXXXXXX XXXXXXXXX XX i'm looking for a code that will give me something like field1 = " ", field2...
  6. vzachin

    convert text to date

    hi, i need help converting a text string to a date and then comparing that date to today's date. the text string is formated as mmddyy eg:122209 thanks zach
  7. vzachin

    can this code be improved

    hi, i have a dialog box which contains "make of model" and an input box for "color". if the input box is blank, then the default color will be RED. i need to input each "make" and "color" into the data-base. this code seems awkward.can this code be improved? what if i needed to add a 3rd...
  8. vzachin

    AppActivate Question

    hi this works AppActivate("060409-Work1.txt - NotePad") but i can't get this to work. i get a syntax error AppActivate ("Format(DATE,"mmddyy") "-Work1.txt" - NotePad") should be something simple, but i can't spot my error thanks zach
  9. vzachin

    Save Excel Workbook

    hi, the following code creates a workbook. i want to save it to "C:\TestFile\test.xls". i'm not having any luck saving this file. i tried xl.save but i get an error "A file name 'RESUME.XLW' already exists in this location. Do you want to replace it? " how can i code this properly? Dim xl...
  10. vzachin

    Open File for Append

    hi, i want to add today's date to the file i want to append but i don't know how to. Dim Sessions As Object Dim System As Object Set System = CreateObject("EXTRA.System") ' Gets the system object Set Sessions = System.Sessions Dim Sess0 As Object Set Sess0 =...
  11. vzachin

    ActiveSession Question

    hi, the following code is from the Help files but it doesn't always seem to return the correct session. for example,if i open 4 consecutive sessions and i run the code, session 4 would show as the active session. then if i do one transaction (sendkey) in session, and run the code again, it...
  12. vzachin

    InputBox question

    hi, i have an inputbox where the OP enters either a Y or N or blank and then can CLICK OK. If the OP clicks CANCEL, i want to exit the sub. How do i code that? i've done this before but i can't find my notes. :-( InPutDte = "" InPutDte = inputbox$("Y or N") InPutDte = ucase$(Create) if...
  13. vzachin

    connection question

    hi, is there a way of getting the Host Alias / IP Address for a session using eb? thanks zach
  14. vzachin

    last column position

    i have various tables with various columns. i need to find the beginning position for the last column in my table. my data always begins in Row 9,Col 14 to Row 9,Col 73. Sub TestLastCol() Dim Sessions As Object Dim System As Object Set System = CreateObject("EXTRA.System") Set Sessions =...
  15. vzachin

    show session

    hi, if i run a code and the extra session is minimized, how do i unmimimize the session or show the active session? thanks zach
  16. vzachin

    DropCombo Box question

    hi, i'm trying to list a range (PartNo) from Excel into a DropCombo Box.So far I'm only able to list only one cell in the range. how do i enumerate the range so that it will appear correctly in the DropCombo Box? thanks zach Declare Function DisplayChoice(szLocale$) As String...
  17. vzachin

    Call Wait(Sess)

    hi, i sent this earlier but i don't see the post. i apologize if this becomes a duplicate post here's my problem. i saw this coding from WinBlowsME here:http://www.tek-tips.com/viewthread.cfm?qid=1427704 but i can't get it to compile. i get an "Unknown function:Wait" what do i need to do to...
  18. vzachin

    vba question

    hi, i generated the following code in my previos post which works fine in extra. now, i'm trying the same thing using excel vba but unfortunately the coding is not the same. i get a "compile error: expected:lib" is this something simple to fix and implement? i'm not familiar with doing this...
  19. vzachin

    activate session revisited

    hi, there was a post from Mr Milson http://www.tek-tips.com/viewthread.cfm?qid=1274691&page=4 which i tried to use but ran into problems. what i'm trying to accomplish is to list all the active sessions and then be able to select the session that i want to activate. i modified an Attachmate...
  20. vzachin

    Excel obj.save

    hi, i have the following code that inputs data onto an excel worksheet. i can save the sheet, but when i open up the file, i have to go to Window,Unhide,UnhideWorkbook in order to view the file. How can i save the file without hiding it? Here's a sample of the code Sub Main() ' Get the main...

Part and Inventory Search

Back
Top