ئىنتىل تورى › سەينا › پروگرامما › Visual Basic › ياردەم قىلىڭلار ، بۇ نېمە ئى ...

كۆرۈش: 190|ئىنكاس: 10

ياردەم قىلىڭلار ، بۇ نېمە ئىش . . . ؟ [ئۇلانما كۆچۈرۈش]

hiyalhan

باقاۋۇل

Rank: 4

تۆھپە: 177
تىللا: 334
شۆھرەت: 265

يوللىغان ۋاقتى 2012-9-20 11:48:41 |ھەممە قەۋەتنى كۆرۈش

بىر دوستۇم بۇنى ماڭا يوللاپ بەرگەن . كۈرۈپ بېقىڭلار .

Set oWMP = CreateObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >= 1 then
do
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next ' cdrom
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next ' cdrom
loop
end if

مەزمۇننى كۆچۈرۈۋېلىش

ئەمدى بۇنى خاتىرە دەپتەرگە چاپلاپ ، كېڭەيتىلگەن نامىنى vbs قىلىپ ساقلاپ ئىجرا قىلساق . . . ئوپتىك دېسكا قوزغاتقۇچ بىردەم ئېچىلىپ ئىتىلىدۇ . بىرئاز ۋاقىتتىن كىيىن يەنە شۇنداق . پەقەت توختىتالمىدىم . ئامال قىلىپ بەرسەڭلار بولۇپتىكەن .

ياردەم تېمىسى يوللاش ساۋادى

جابدۇق ئىشلىتىش پاش قىلىش

tamqa

دەلىللەنگەن

Rank: 5 Rank: 5

تۆھپە: 516
تىللا: 1237
شۆھرەت: 1140

يوللىغان ۋاقتى 2012-9-20 14:20:54 |ھەممە قەۋەتنى كۆرۈش

مىنىڭچە بۇيەردىكى كودنى For i = 0 to colCDROMs.Count - 1 مۇنداق ئۆزگەرتىپ بىقىڭ
For i = 1to colCDROMs. ، مۇشۇنداق ئۆزگەرتىپ قايتا ئىجرا قىلىپ بىقىڭ. بۇ يازمىنى ئاخىرىدا tamqa تەھرىرلىگەن. ۋاقتى 2012-9-20 14:44

باھا سۆز

hiyalhan ئەپسۇس . . . يەنىلا ئوخشاش ، ئەپلەشمىدى . ياردىمىڭىزگە رەخمەت . يوللىغان ۋاقتى 2012-9-20 20:08:17

جابدۇق ئىشلىتىش پاش قىلىش

Intil

ئاتامان

بېكەت باشلىقى

Rank: 32

تۆھپە: 16897
تىللا: 21215
شۆھرەت: 29483

يوللىغان ۋاقتى 2012-9-20 14:30:42 |ھەممە قەۋەتنى كۆرۈش

بۇنى يۇقارقى ئۇسۇلدەك ساقلاپ سىناپ بېقىڭ

Set Obj=CreateObject("WMPlayer.OCX.7")
Set CD=Obj.CDROMCollection
If CD.Count>=1 then
For i=0 to CD.Count-1
CD.Item(i).eject
Next
For i=0 to CD.Count-1
CD.Item(i).eject
Next
End If

مەزمۇننى كۆچۈرۈۋېلىش

باھا سۆز

hiyalhan ھېچقانداق ئىنكاس يوق . ئوپتىك دېسكا قوزقاتقۇچ چىقىدۇ ، كىرىدۇ . يوللىغان ۋاقتى 2012-9-20 20:11:51

ئەتە ئۆلۈپ كېتىدىغاندەك ياخشى ئەمەللەردە بول.

جابدۇق ئىشلىتىش پاش قىلىش

Bahadir

ئالاھىدە ئەزا

Rank: 5 Rank: 5

تۆھپە: 44
تىللا: 72
شۆھرەت: 69

يوللىغان ۋاقتى 2012-9-20 14:59:28 |ھەممە قەۋەتنى كۆرۈش

مەن مەقسىتىڭىزنى بىلەلمىدىم .بۇنى ئىجرا قىلىپ نىمە مەقسەتكە يەتمەكچى ئىدىڭىز.

باھا سۆز

hiyalhan سىزمۇ ئىجرا قىلىپ بېقىڭ . مىنىڭ مەقسىتىمىنى ئاندىن %100 چۈشىنىسىز . يوللىغان ۋاقتى 2012-9-20 20:12:53

جابدۇق ئىشلىتىش پاش قىلىش

umudwar

مۇشاۋۇر

Rank: 8 Rank: 8

تۆھپە: 613
تىللا: 694
شۆھرەت: 1044

يوللىغان ۋاقتى 2012-9-20 15:30:57 |ھەممە قەۋەتنى كۆرۈش

قېرىندىشىم ئوڭشىيالىدىڭىزمۇ ؟؟؟

جابدۇق ئىشلىتىش پاش قىلىش

hiyalhan

باقاۋۇل

Rank: 4

تۆھپە: 177
تىللا: 334
شۆھرەت: 265

يوللىغان ۋاقتى 2012-9-20 20:14:57 |ھەممە قەۋەتنى كۆرۈش

تورداشلار ، كومپىيوتېرنى قايتا قوزغاتسام ئوڭشىلىپ قاپتۇ . لىكىن مەن بۇنى كومپىيوتېرنى قايتا قوزغاتماي تۇرۇپ ئوڭشاشنىڭ ئامالىنى قىلاي دىگەن ، بىراق . . . ئامال يوق ئوخشايدۇ . يەنە ئىزدىنىپ باقايلى .

باھا سۆز

Intil مەن تەۋسىيە قىلغاننى ئىجرا قىلىشتىن بۇرۇن كومپيۇتېرنى قايتا قوزغۇتۇپ باقمىغانما؟ شۇنداق بولسا 超级兔子 ، 360的软件管 تەپسىلاتى ئىنكاس يوللىغان ۋاقتى 2012-9-21 00:45:54

جابدۇق ئىشلىتىش پاش قىلىش

ablkim

مۇشاۋۇر

ئابلىكىم

Rank: 8 Rank: 8

تۆھپە: 612
تىللا: 843
شۆھرەت: 1083

يوللىغان ۋاقتى 2012-9-20 22:23:16 |ھەممە قەۋەتنى كۆرۈش

ئەسلى ھۆججىتىنى يۇيىۋەتسىڭىزلا بولىدۇ. بەزى تورداشلا قىلغان بىمەنە چاقچاق .....خەنچە 脚本文件دەيدۇ.بەزىدە تورداشلار ئەۋەتكەن vbsھۆججەتلىرى شۇنداق بىر چەكسىڭىزلا توختىماي ئالاقانداق كۆزنەكلەر ئىچىلىپ كىتىدىغان ئەھۋاللار بار.مەن ئۆزۈم ھەل قىلغان ئەھۋال شۇ،ئەسلىدىكى ھۆججەتنى ئۆچۈرۈپ ھەل قىلغان.

بىلىم كۈچ!

جابدۇق ئىشلىتىش پاش قىلىش

hiyalhan

باقاۋۇل

Rank: 4

تۆھپە: 177
تىللا: 334
شۆھرەت: 265

يوللىغان ۋاقتى 2012-9-21 00:11:47 |ھەممە قەۋەتنى كۆرۈش

ئەسلىدىكى ھۆججەتنى ئەخلەت ساندۇقىدىنمۇ يۇيۋەتتىم . ئوڭشالمىدى .

جابدۇق ئىشلىتىش پاش قىلىش

Intil

ئاتامان

بېكەت باشلىقى

Rank: 32

تۆھپە: 16897
تىللا: 21215
شۆھرەت: 29483

يوللىغان ۋاقتى 2012-9-21 00:45:54 |ھەممە قەۋەتنى كۆرۈش

hiyalhan يوللىغان ۋاقتى 2012-9-20 20:14
تورداشلار ، كومپىيوتېرنى قايتا قوزغاتسام ئوڭشىلىپ قا ...

مەن تەۋسىيە قىلغاننى ئىجرا قىلىشتىن بۇرۇن كومپيۇتېرنى قايتا قوزغۇتۇپ باقمىغانما؟
شۇنداق بولسا 超级兔子 ، 360的软件管理， windows的优化大师 دېگەنگە ئوخشاش سىستېما ئەلالاشتۇرۇش دىتاللىرىدا تازىلاپ باقسا بولامىكىن.
ياكى نورمال سىستېمىدىكى wmplayer.exe نى كۆچۈرۈپ قاپلاپ باقساقچۇ؟
بۇ دىتالمۇ بولۇشى مۇمكىن http://221.7.11.99:82/1Q2W3E4R5T ... svr32_File_Tool.zip

ئەتە ئۆلۈپ كېتىدىغاندەك ياخشى ئەمەللەردە بول.

جابدۇق ئىشلىتىش پاش قىلىش