قۇتيار مۇنبىرى

ئىزدەش
ئىم قايتۇرۇۋېلىش  خەتلىتىڭ

vb.net دا cmd بۇيرۇقىنى ئىجرا قىلىىش [ئۇلانما كۆچۈرۈش]

  • كۆرۈش2659
  • ئىنكاس0
0-قەۋەت
‎2017-5-14 14:08:58 يوللىغان ۋاقتى
بۇ يازمىنى ئاخىرىدا   Qut تەھرىرلىگەن. ۋاقتى  2017-5-14 14:12  
. N$ d5 f+ X1 A$ ~6 p+ N( p8 P9 G3 n2 G1 q6 ?' Y7 b' H( T
پروگىرامما توغۇرلۇق تېما يوللىمىغىلى  ئۇزاق بوپتۇ    بەزى ئەكۋاللاردا  پروگىرامما كۆزنىكىدە  تۇرۇپ     cmd  بۇيرىقىنى ئىجرا قىلىش  توغرا كىلىپ قالىدۇ   مەن بۇگۇن شۇ توغۇرلۇق بىر تېما  يوللاپ كەلدىم  & |& g- s& Y8 D0 x7 ]+ g
يىزىلغان كود  خەنزۇچە تور بېكەتتىن كۈچۈرۈلۇپ  كىلىندى
6 h- Y0 @  x5 G5 ~+ }9 w9 K# m4 `/ @4 Z; q
پروگىرامما ئىجرا بولغاندىن كېيىنكى كۈرۈنۈش
. @, @0 g% Q$ S; z1 s3 o8 x QQ截图20170514134440.png . O, q/ X8 y1 Y4 J' ~
. r! V- m$ o$ {- [5 u5 K, M' _$ |$ w
model   غا  توۋەندىكى  كودنى كۈچۈرۈپ چاپلايمىز
  1.     Public Function ExecuteCmd(ByVal cmd As String)
    % V9 I1 I( W" v  a
  2.         Dim startInfo As New ProcessStartInfo("cmd.exe")+ b% K! W/ s+ F0 O0 e7 ^
  3.         With startInfo" ~. N' f) }0 t0 u
  4.             .Arguments = "/C " + cmd( m7 ]1 _' ?4 d6 J9 k8 m$ {
  5.             .RedirectStandardError = True  p* u. K4 d5 |7 @9 b
  6.             .RedirectStandardOutput = True
    % ?# @, w6 ?1 w2 A4 O% G' `
  7.             .UseShellExecute = False% m& D3 z8 j" [4 X! ^
  8.             .CreateNoWindow = True
    ' @/ o) L6 y  C6 j# X$ s
  9.         End With2 P( F- H3 p$ Z4 q
  10. 7 u/ Y1 R6 _% ?( }  R
  11.         Dim p As Process = Process.Start(startInfo); I/ |4 v) H& U* F7 N! e3 V  M; I
  12.         Dim strOutput As String = p.StandardOutput.ReadToEnd()
    3 b& q! r( \+ L2 V* \9 u
  13.         Dim strError As String = p.StandardError.ReadToEnd()
    0 e. q: G6 c/ H2 r2 f

  14. 3 j3 H( P+ j0 }
  15.         p.WaitForExit()9 m2 u3 H6 L" f4 i) ^% n! u
  16. 6 d. U) F8 n& i
  17.         If (strOutput.Length <> 0) Then
    2 g3 L' w; b% @, N0 K! m$ p
  18.             Return strOutput
    ' `; F! u  I7 N6 z9 B# F+ D" P
  19.         ElseIf (strError.Length <> 0) Then& G3 Z6 Z- l- p' l/ o7 Q+ ]
  20.             Return strError" q6 H* s" l4 B; `& w! l# f# M
  21.         End If
    + ?1 Y# F, R3 M) y9 ]; f) ^
  22. " O6 J6 }3 z& y) o% J8 e7 o
  23.         Return ""- j  \4 j. p! f4 J+ G' k4 q- j
  24.     End Function
مەزمۇننى كۆچۈرۈۋېلىش
ئاندىن   bottun غا توۋەندىكى كودنى چاپلايمىز
  1.      TextBox2.Text = ExecuteCmd(TextBox1.Text)
مەزمۇننى كۆچۈرۈۋېلىش
تامام ' t  A' O9 R, Y1 T: h" r

2 i/ V  F  e# pكېيىنكى قېتىم  تېلېاۇنلارغا  ئەپ قاچىلاش  پروگىراممىسى  تۈزەش توغۇرلۇق تېما يوللايمەن   H9 O7 J1 E0 i
5 r0 |7 {# b" [3 r
8 U+ E) u2 |4 U+ t* |% K) i
ھازىرغىچە 1 ئادەم باھالىدىشۆھرەت تەجرىبە تەڭگە يىغىش سەۋەبى
jastar ‎+7 ‎+10 ‎+5 قوللايمەن

ھەممە باھا نومۇرى : ‎شۆھرەت + 7  ‎تەجرىبە + 10  ‎تەڭگە + 5   باھا خاتىرىسى

شەرەپلىك ئەزا

Rank:8

[؟]

تەجرىبە
1924
شۆھرەت
342
تەڭگە
120

شەرەپلىك ئەزا قىزغىن ئەزا VIP ئەزا

تېز ئىنكاس يېزىش

كىرگەندىن كېيىن ئىنكاس يازالايسىز كىرىش | خەتلىتىڭ

ئەسسالام مېھمان

ئاقسۇ قۇتيار كومپيۇتېر شىركىتى باشقۇرۇشىدىكى كومپيۇتېر، ئۇيغۇرچە خەتلىك فىلىم، ساپ ئۇيغۇر تىلىدىكى دەرسلىك ۋە دېتاللارنى ئاساس قىلغان كەسپىي تور بېكەت.
ئۇيغۇرچە discuz ئاساسىدا قۇتيار تورى قايتىدىن تەڭشىدى ، ئۇيغۇرچە discuz ئۈچۈن تەر تۆككەن نۇرقۇت تورىغا ئالاھىدە رەھمەت ئېيتىمىز.
Processed in 0.087233 second(s), 18 queries . GMT+8, 2017-6-23 16:36  新10002915号-1 Powered by Discuz! X2
چوققىغا قايتىش