New topic: 

Shell Command doesn't work

<http://forums.realsoftware.com/viewtopic.php?t=30663>

       Page 1 of 1
   [ 1 post ]                 Previous topic | Next topic         Author  
Message       dd3oc           Post subject: Shell Command doesn't workPosted: 
Mon Oct 26, 2009 3:26 am                        
Joined: Wed Mar 29, 2006 3:02 am
Posts: 32
Location: Germany              Hi folks,

this following code works under MAC OS X very fine but not under Windows XP.
Do you have a idea / solution?

Key down: 
  If Key = Chr(13) Then
  if TargetMacOS = true then
  If Not app.mshell(0).IsRunning Then
    app.mshell(0).Execute "sh"
  End If
  elseif TargetWin32=true then
  If Not app.mshell(0).IsRunning Then
    app.mshell(0).Execute "cmd"
  End If
  end if
  app.mshell(0).Write ShellInput.text
  app.mshell(0).Write Chr(13)
  ShellInput.Text = ""
  Return True
  Else
  Return False
  End If

Read data under shell dataAvaiable
  dim temp as string
  temp = me.ReadAll
  Window1.shellNewOutput = Window1.shellNewOutput + temp // zwischen speichern
  
  Window1.ShellOutput.SelText = temp //+"+++++++"+str(z)

Klemens   
                            Top           Display posts from previous: All 
posts1 day7 days2 weeks1 month3 months6 months1 year Sort by AuthorPost 
timeSubject AscendingDescending          Page 1 of 1
   [ 1 post ]     
-- 
Over 1500 classes with 29000 functions in one REALbasic plug-in collection. 
The Monkeybread Software Realbasic Plugin v9.3. 
http://www.monkeybreadsoftware.de/realbasic/plugins.shtml

[email protected]

Reply via email to