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
. O, q/ X8 y1 Y4 J' ~
. r! V- m$ o$ {- [5 u5 K, M' _$ |$ w
model غا توۋەندىكى كودنى كۈچۈرۈپ چاپلايمىز- Public Function ExecuteCmd(ByVal cmd As String)
% V9 I1 I( W" v a - Dim startInfo As New ProcessStartInfo("cmd.exe")+ b% K! W/ s+ F0 O0 e7 ^
- With startInfo" ~. N' f) }0 t0 u
- .Arguments = "/C " + cmd( m7 ]1 _' ?4 d6 J9 k8 m$ {
- .RedirectStandardError = True p* u. K4 d5 |7 @9 b
- .RedirectStandardOutput = True
% ?# @, w6 ?1 w2 A4 O% G' ` - .UseShellExecute = False% m& D3 z8 j" [4 X! ^
- .CreateNoWindow = True
' @/ o) L6 y C6 j# X$ s - End With2 P( F- H3 p$ Z4 q
- 7 u/ Y1 R6 _% ?( } R
- Dim p As Process = Process.Start(startInfo); I/ |4 v) H& U* F7 N! e3 V M; I
- Dim strOutput As String = p.StandardOutput.ReadToEnd()
3 b& q! r( \+ L2 V* \9 u - Dim strError As String = p.StandardError.ReadToEnd()
0 e. q: G6 c/ H2 r2 f
3 j3 H( P+ j0 }- p.WaitForExit()9 m2 u3 H6 L" f4 i) ^% n! u
- 6 d. U) F8 n& i
- If (strOutput.Length <> 0) Then
2 g3 L' w; b% @, N0 K! m$ p - Return strOutput
' `; F! u I7 N6 z9 B# F+ D" P - ElseIf (strError.Length <> 0) Then& G3 Z6 Z- l- p' l/ o7 Q+ ]
- Return strError" q6 H* s" l4 B; `& w! l# f# M
- End If
+ ?1 Y# F, R3 M) y9 ]; f) ^ - " O6 J6 }3 z& y) o% J8 e7 o
- Return ""- j \4 j. p! f4 J+ G' k4 q- j
- End Function
مەزمۇننى كۆچۈرۈۋېلىش ئاندىن bottun غا توۋەندىكى كودنى چاپلايمىز- 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
|
-
ھەممە باھا نومۇرى : شۆھرەت + 7
تەجرىبە + 10
تەڭگە + 5
باھا خاتىرىسى
|
- تىزىملاتقان
- 2012-12-4
- ئاخىرقى قېتىم
- 2017-6-23
- ھوقۇقى
- 12
- جۇغلانما
- 2922
- يازما
- 189
- نادىر
- 1
شەرەپلىك ئەزا

![[ تەجرىبە 4 _ دەرىجە ] ≥ 1600](source/plugin/qz_mmm/images/0/fenzuan4.gif) ![[ شۆھرەت 1 _ دەرىجە ] ≥ 180](source/plugin/qz_mmm/images/0/heizuan1.gif) ![[ تېخى يورۇمىدى: نادىر تېما ] تەلىپى: 5](source/plugin/qz_mmm/images/0/huizuan.gif) ![[ تەڭگە 1 _ دەرىجە ] ≥ 100](source/plugin/qz_mmm/images/0/huangzuan1.gif) ![[ تېخى يورۇمىدى: تېما سانى ] تەلىپى: 50](source/plugin/qz_mmm/images/0/huizuan.gif) ![[ توردىكى ۋاقت 2 _ دەرىجە ] ≥ 144](source/plugin/qz_mmm/images/0/lvzuan2.gif) [؟]
تەجرىبە- 1924
شۆھرەت- 342
تەڭگە- 120
|