External application window position

• • Reply

  10 years ago

  by d_a_r_k

  Dundukas Dardundukesnis

  PNVZ, Lithuania

  Joined 10 years ago

  Hello, I'm working on some project and I need your help guys. I'm just a beginner. I searched the forums for a related topic but couldn't found any resolved answer. So how can I make start my external application "DXSETUP.exe" at center screen position using this code? Thanks.

  Private Sub Panel3MouseClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Panel3.MouseClick Try Me.Hide() Threading.Thread.Sleep(2000) With dx.StartInfo .UseShellExecute = True .FileName = Application.StartupPath & "\redist\directxJun2010redist\DXSETUP.exe" End With dx.Start() dx.WaitForExit() dx.Close() Threading.Thread.Sleep(2000) Try Shell(Application.StartupPath & "\Setup.exe", vbNormalFocus) Catch ex As Exception guierror1.ShowDialog() End Try Application.Exit() Catch ex As Exception gui_error2.ShowDialog() End Try End Sub

  Report abuse
• • Reply

  10 years ago

  by d_a_r_k

  Dundukas Dardundukesnis

  PNVZ, Lithuania

  Joined 10 years ago

  Sorry this should be the code:

  Private Sub Panel3_MouseClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Panel3.MouseClick
  Try
    Me.Hide()
    Threading.Thread.Sleep(2000)
    With dx.StartInfo
      .UseShellExecute = True
      .FileName = Application.StartupPath & "\redist\directx_Jun2010_redist\DXSETUP.exe"
    End With
    dx.Start()
    dx.WaitForExit()
    dx.Close()
    Threading.Thread.Sleep(2000)
    Try
      Shell(Application.StartupPath & "\Setup.exe", vbNormalFocus)
    Catch ex As Exception
      gui_error1.ShowDialog()
    End Try
    Application.Exit()
  Catch ex As Exception
    gui_error2.ShowDialog()
  End Try
  End Sub
  

  Report abuse
• • Reply

  10 years ago

  by d_a_r_k

  Dundukas Dardundukesnis

  PNVZ, Lithuania

  Joined 10 years ago

  sorry for double post

  Report abuse