Disable olan ethernet kartını bat dosyası ile enable yapmak

merhabalar

bunun için netsh ve devcon komutlarını kullanabilirsiniz.

netsh ile sorun yaşayabilirsiniz ancak devcon ile rahatlıkla halledersiniz.

http://support.microsoft.com/kb/311272

yukarıdaki linkte devcon ile ilgili açıklamalar var.

netsh ile ilgili de;

Enable etmek için;

netsh interface set interface "Local Area Connection " ENABLE


Disable etmek için;

netsh interface set interface "Local Area Connection " DISABLE

yada aşağıdaki scripti bir dene.

Const ssfCONTROLS = 3

sConnectionName = "Local Area Connection"

sEnableVerb = "En&able"
sDisableVerb = "Disa&ble"

set shellApp = createobject("shell.application")
set oControlPanel = shellApp.Namespace(ssfCONTROLS)

set oNetConnections = nothing
for each folderitem in oControlPanel.items
if folderitem.name = "Network and Dial-up Connections" then
set oNetConnections = folderitem.getfolder: exit for
end if
next

if oNetConnections is nothing then
msgbox "Couldn't find 'Network and Dial-up Connections' folder"
wscript.quit
end if

set oLanConnection = nothing
for each folderitem in oNetConnections.items
if lcase(folderitem.name) = lcase(sConnectionName) then
set oLanConnection = folderitem: exit for
end if
next

if oLanConnection is nothing then
msgbox "Couldn't find '" & sConnectionName & "' item"
wscript.quit
end if

bEnabled = true
set oEnableVerb = nothing
set oDisableVerb = nothing
s = "Verbs: " & vbcrlf
for each verb in oLanConnection.verbs
s = s & vbcrlf & verb.name
if verb.name = sEnableVerb then
set oEnableVerb = verb
bEnabled = false
end if
if verb.name = sDisableVerb then
set oDisableVerb = verb
end if
next

'debugging displays left just in case...
'
'msgbox s ': wscript.quit
'msgbox "Enabled: " & bEnabled ': wscript.quit

'not sure why, but invokeverb always seemed to work
'for enable but not disable.
'
'saving a reference to the appropriate verb object
'and calling the DoIt method always seems to work.
'
if bEnabled then
' oLanConnection.invokeverb sDisableVerb
oDisableVerb.DoIt
else
' oLanConnection.invokeverb sEnableVerb
oEnableVerb.DoIt
end if

'adjust the sleep duration below as needed...
'
'if you let the oLanConnection go out of scope
'and be destroyed too soon, the action of the verb
'may not take...
'
wscript.sleep 1000

kolay gelsin

 

Devcon.exe ile yapılan hardware ID ile sadece haberleşmeyi kapatma ve açmaktan öteye geçmiyor mümin bey ama netsh komutunu denemedim, kullanımı ile ilgili de pek bilgim yok. Komut satırında denediğimde " Bu adlı bir arabirim yönlendiriciye kayıtlı değil" diye bir uyarı alıyorum. Belki yanlış bişey yapıyor olabilirim. Nasıl kullanabileceğimi açıklarsan sevinirim ve bu komutu bat dosyası olarak kullanabilir miyim?? 

Devcon.exe ile yapılan hardware ID ile sadece haberleşmeyi kapatma ve açmaktan öteye geçmiyor mümin bey ama netsh komutunu denemedim, kullanımı ile ilgili de pek bilgim yok. Komut satırında denediğimde " Bu adlı bir arabirim yönlendiriciye kayıtlı değil" diye bir uyarı alıyorum. Belki yanlış bişey yapıyor olabilirim. Nasıl kullanabileceğimi açıklarsan sevinirim ve bu komutu bat dosyası olarak kullanabilir miyim?? 

Komut satırını açtığınızda netsh komutunu verip diğer satırı uygulayın.Bir de eğer işletim sisiteminiz türkçe ise Local Are Connection kısmı yerine Yerel Ağ Bağlantısı yazmayı  denermisiniz.

Script guy ı indirip içinde arama yaparsan her tür script e ulaşabilirsin

 

http://www.microsoft.com/downloads/details.aspx?FamilyID=5f5e0bda-923a-4744-8289-afb73f6a5ed8

Bende test amaçlı iki işletim sistemi de mevcut.. yalnız bu komut çalışmıyor, siz denediniz mi peki çalıştığına emin misiniz? Area veya Ağ admin için geçerli bir değer değil diye bir hata veriyor.