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!

Register Log in
  • Congratulations derfloh 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: *

  1. PinkeyNBrain

    Is there a TCL function like Getch ?

    Can you open a window (sub window / top level?) that has a generic "OK" button and that button is given focus so that all the user has to do is hit return?
  2. PinkeyNBrain

    Need some urgent help with tcl comands

    If lsort supplies the end result you need and you are not constrained by time issues of lists that are 100's of thousands long, then go with it. If you have huge lists and sorting speed is paramount, there are sites where you can find/review the various theories/algorithms on sorting. Bubble...
  3. PinkeyNBrain

    TCL proc and arg quartion

    Bit of a swag here, but do you needdashboard_set_property ${::led_control::dash_path} box_led_${led} onChange ${::led_control::toggle ${led}} .. add a $ var ref to the last parameter? Try addding a "put 'xxx'" command inline and see if that parses out to the variable value you're after.
  4. PinkeyNBrain

    PureData (a.k.a. Netezza, PostgreSQL) ERROR parsing problem

    Give this a try. It's totally brute force, but for the sake of getting a job done over elegance -- # # Reading in # undef %org_data ; $line_num = 0 ; $char_count = 0 ; while ($inline = <DATA>) { $line_str = substr('00000' . ++$line_num, -5) ; chomp $inline ; # ?? Does your 'at char...
  5. PinkeyNBrain

    Retaining a range definition

    Skip - Thank you for your time. My attempt at a colloquial explanation of what I’m doing, versus demonstrating thru code, has fostered a completely wrong picture of what I’m doing. In this case a 'table' for me is roughly a grid 3x10 in size. The entire screen has columns A-0 (15 columns) and...
  6. PinkeyNBrain

    Retaining a range definition

    MOVE = CUT – Got it. Your usage of caps caused me to think you were referring to another command. Usually I see people asking for code more over than concepts - but here goes: - User enters data into a textbox on a worksheet (not a cell but an activeX object). Hits enter. - Sheet level...
  7. PinkeyNBrain

    Retaining a range definition

    Indirectly tried the saved address idea. ConsiderSelect Case some_val Case 1: Set cell_ref = default_range1 ' Assume this is selected Case 2: Set cell_ref = default_range2 End Select save_addr = cell_ref.Address cell_ref.Cut Destination:=cell_ref.offset(1,1) set cell_ref =...
  8. PinkeyNBrain

    Retaining a range definition

    Problem: I want to move a range of data but using code similar to[CODE VBA]src_range.Cut Destination:=des_range[/CODE] I find src_range.Address is changed to match des_range.Address. In some cases my value for des_range is compromized. I want to retain the original definition of...
  9. PinkeyNBrain

    Retaining a range definition

    Sure - thx
  10. PinkeyNBrain

    Retaining a range definition

    Please substitute Destination for Destionation above
  11. PinkeyNBrain

    Retaining a range definition

    Problem: I want to move a range of data but using code similar tosrc_range.Cut Destionation:=des_rangeI find src_range.Address is changed to match des_range.Address. In some cases my value for des_range is compromized. I want to retain the original definition of src_range.Address. I...
  12. PinkeyNBrain

    Use of uninitialized value in string

    This is a tad brute force, but will get you thereprint "cc>$cc<\n" ; print "container>$container<\n" ; print "h_set'component'>$h_set{"component"}{$cc}{$container}<\n"; prnit "\$_>$_<\n"; ; print "h_set'interface'>$h_set{"interface"}{$cc}{$container}<\n"; print...
  13. PinkeyNBrain

    Back Ticks - can't get it to work.

    Thinking back, I have seen that sort of thing before - the system call executes under a different set of credentials. At a command prompt I tried 'help start' and 'help cmd' and neither of them showed references on how to supply a user/password in the calling sequence to potentially reset your...
  14. PinkeyNBrain

    Back Ticks - can't get it to work.

    Taking a swag here ... Does$cmd = "d:\\\\officetopdf\\\\officetopdf.exe /print"; work? (Using 4 backslashes) Try dumping $@, $! and $^E as well. May give more insight.
  15. PinkeyNBrain

    Back Ticks - can't get it to work.

    Couple thoughts: 1 - Your assignment $cmd = "d:\\xxx\\yyy" ; Will translate into d:\xxx\yyy in $cmd. Then when you use `$cmd` it is looking at d:\xxx\yyy and will again translate the \x and \y into their equivalent escape characters. Try using single quotes on the initial $cmd = 'd:\\xxx\\yyy'...
  16. PinkeyNBrain

    Upgrade to 8.6 causes file problems.

    Any insight as to which line it is hanging at? Unfortunately I'm thinking something as painful asproc GetData {chan} { puts "1" if {[gets $chan line] >= 0} { puts $line } puts "2" if {[eof $chan]} { puts "2.1" close $chan puts "2.2" }...
  17. PinkeyNBrain

    Reading Event Logs in Win2008

    ...then to read the log files and process them. Effectively the $handle variable as defined above is being replaced with a file handle pointing to a *.txt file. Here is the code I used. The first connects to a Win2008 server (which started all this) the second connects to a Win2003 server (of...
  18. PinkeyNBrain

    Reading Event Logs in Win2008

    I've been successfully using a home-grown event viewer that used$handle=Win32::EventLog->new($event_group, $server_name) ; where $event_group was one of the basic "Application", "System", or "Security". One of the routines looked for print jobs to help me keep track of the heaviest users...
  19. PinkeyNBrain

    Help catching STDIN in background

    ...generic: print "What now? " ; $response = <STDIN> ; type input retrieval. If ($x, $y) are not in your borders - just keep doing what you were doing before. *** Caution: - Generate a function that will test the state of the window $hWnd. If the user moves it, ($l,$t,$r,$b) values will...
  20. PinkeyNBrain

    Quotes in a TSM Perl command

    At the end of your open, do you need a trailing space before the pipe "$tsmsrv_cmd0|" or maybe "$tsmsrv_cmd0 |"?

Part and Inventory Search

Back
Top