автоматизирование настроек

schnurok · 7 Фев 2007

Всем Привет
есть пару вапросов
кто знает где находятся записи как Standortname и Ortskenzahl Amtskenziffer
я думаю што гдето в регестри и можно ли написат файл спомошю каророва ето все будет заносится автоматически именно то што на
и следуешее можно написат файл каторый отключает или включает Netzverkkomponente все которые надо
меня ише интересует можно ли создат обший ярлык для WLAN карты потомушто еслив ево делаеш на одном компе он уже нефурычет надругом так как MAC другой
Также меня ише интересуэт как создат файл штобы спомошю нево папка копирывалас с одно места на другое
также меня интересует ест ли прямай сылка на Gerдte-Meneger и Software

а еше былобы лутше еслиб комп отробатывал ето все сам один за дним

еслив у кавонибут ест какието ответы на мои выше заданые вопросы буду очен рад почитат и применит мне ето приходится все применят каждый день

спасибо всем зарание

schnurok · 8 Фев 2007

ниукаво никакиh сображений нет?

Technolog · 8 Фев 2007

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Telephony\Locations\Location1
Здесь настройки телефона, факса и тп.

Gerдte-Manager запускаешь либо через Ausfьhren --> devmgmt.msc либо через ярлык %systemroot%\system32\devmgmt.msc

Что касается всего остального, ты бы написал чего хочешь добиться, тогда проще было бы решать. Например копирование папки - можно кучей способов реализовать.

schnurok · 8 Фев 2007

Спасибо тебе за инфу
уже зделал Regfeil для модема фурыцит
Ярлык тоже фурычет

по поводу другова
мне надо деактивироват некоторые Netzwerkadapter например как WAN- Miniport (L2PT), WAN- Miniport (PPTP) ну и еше пару других таким же способом желателно как нашет модема я думаю што ето инфа тоже гдето занесена в regestry

schnurok · 9 Фев 2007

нашет папок
лежыт у мення папка скажем на \\бла\папка
а надо реализироват так штобы ето папка окозалас на
Десктоп\папка

и еше надо стоб в ету папку после таво как она окажытся на Десктопе перенесился один феил который лежыт на \Десктоп\файл.бат
тоэст стоб было \Десктоп\папка\файл.бат
а на десктопе стерался

ну еслив ише возможно стоб он переиминовался при переносе например из файл.бат в диск.бат ето былобы вобше супер

буду рад ккаждому ответу

I+L+Y+A · 9 Фев 2007

Напиши CMDшку для всего этого дела и добавь ее (если надо это при каждом запуске) в Autostart.

schnurok · 9 Фев 2007

Подскажы как и чо
я написчу

Technolog · 9 Фев 2007

С копированием это не проблема. Сделай батник напиши туда

Исходный код

@echo off
cls
move /Y "%USERPROFILE%\Desktop\datei.txt" "%USERPROFILE%\Desktop\Dat\dateineu.txt"

соответственно заменив имена файлов.

Интереснее с сетевыми карточками. По идее можно использовать netsh или devcon. В первом случае работаешь с aliase во втором случае напрямую с картой. Есть еще скрипты которые считывают менюшку сетевого соединения (правая кнопка на LAN-Verbindung) и, например если стоит Deaktivieren, т.е соединение активно, выключают его. Но надо на каждое соединение свой скрипт. Будет в выходные побольше времени кое-что почитаю.

schnurok · 9 Фев 2007

спасибо за ответы испробую по поводу папок

еслиб ест скрипты былобы неплоhо

schnurok · 9 Фев 2007

добился што могу перенести файл и штоб сразу переименовался
но еслив я hоче копироват папку чере копи он мне толко копируэт файлы из папки а папку саму нет
эст у кавонибут идея чо я делаю неправилно

Technolog · 9 Фев 2007

Вот он скрипт. Я его немного подправил и закоментировал. Работает просто. Один раз запустил - LAN-Verbindung, то что вверху задекларировано, меняет свой статус, т.е. если было актив, будет неактив и наоборот.

Исходный код

'-----------------------------------------------------------
'NetzStatus.vbs
'-----------------------------------------------------------


Const ssfCONTROLS = 3


'Der Name der Verbindung dessen Status geдndert werden soll
sConnectionName = "LAN-Verbindung"		


'Menuitem - Aktivieren
sEnableVerb = "&Aktivieren"
'Menuitem - Deaktivieren
sDisableVerb = "&Deaktivieren" 


set shellApp = createobject("shell.application")
'In Systemsteuerung gehen
set oControlPanel = shellApp.Namespace(ssfCONTROLS)		


set oNetConnections = nothing


'Alles in Systemsteuerung durchgehen
for each folderitem in oControlPanel.items	
   'Ordner mit Netzwerkverbindungen finden	
   if folderitem.name="Netzwerk- und DFЬ-Verbindungen" then   
   		set oNetConnections = folderitem.getfolder: exit for
   end if
next


'Wenn Ordner nicht gefunden wird, Fehlermeldung und alles abbrechen 
if oNetConnections is nothing then		
  msgbox "Ordner Netzwerk- und DFЬ-Verbindungen nicht gefunden"
  wscript.quit
end if


'Alles in Netzwerkverbindungen durchgehen
set oLanConnection = nothing		
for each folderitem in oNetConnections.items
  'In Ordner nach Netzwerkverbindungen suchen (die oben stehen)	
  if lcase(folderitem.name)  = lcase(sConnectionName) then
    set oLanConnection = folderitem: exit for
  end if
next


'Wenn nichts gefunden wird - Fehlermeldung
if oLanConnection is nothing then
  msgbox "Verbindung '" & sConnectionName & "' nicht gefunden"
  wscript.quit
end if


'-----------------------------------------------------------------
'Menuitems bei gefundenen Netzwerkverbindung werden gelesen
' und nach Deaktivieren oder Aktivieren gesucht 
'-----------------------------------------------------------------
bEnabled = true


'Alle Menupunkte durchgehen
for each verb in oLanConnection.verbs
	'Aktivieren gefunden
   if verb.name = sEnableVerb then
    'Soll deaktiviert werden	 
     set oEnableVerb = verb 		
     bEnabled = false
  end if
  'Deaktivieren gefunden
  if verb.name = sDisableVerb then	
  'Soll aktiviert werden 
    set oDisableVerb = verb 		 
  end if
next


'Wird ьberprьft in welchen Zustand Verbindung sich befindet
if bEnabled=true then	'Verbindung aktiv
	'Verbindung deaktivieren
   oDisableVerb.DoIt	
else 	
	'Verbindung aktivieren				
   oEnableVerb.DoIt		
end if


'Warten weil wenn zu schnell das Komando durchgeht wird nichts passieren
wscript.sleep 1000

Показать весь код

Technolog · 9 Фев 2007

Цитата

Со слов пользователя schnurok
добился што могу перенести файл и штоб сразу переименовался
но еслив я hоче копироват папку чере копи он мне толко копируэт файлы из папки а папку саму нет
эст у кавонибут идея чо я делаю неправилно

Для этих вещей используй xcopy.

schnurok · 9 Фев 2007

получается
но тепер он меня постояно спрашывает в конзе штоб я нажал Кнопку [V] штоб он зделал ету папку да десктопе
ето можно какойнибут командой отключит стоб он сам ето делал

Technolog · 9 Фев 2007

Schnurok, ты hilfe принципиально не читаешь? Зря батенька.

Исходный код

Z:\>xcopy /?
  /Y        Unterdrьckt die Aufforderung zur Bestдtigung, dass eine
            vorhandene Zieldatei ьberschrieben werden soll.

schnurok · 9 Фев 2007

нет читаю но ето непомогает покрайне мере в етом случае
я нашол другой выход
я сначало делай папку через команду [MD] а потом он уже с помошю [/Y] неспрашывает просто переписывает папку

Technolog · 9 Фев 2007

Ну так xcopy только копирует. Если папки нет то конечно сначала создать надо.
С помощью devcon можно на уровне Gerдt-Manager (который devcon и заменяет) карту деактивировать а потом активировать. Проблема только в обработке вывода команд. В линуксе можно через pipe команды связать, под виндой не катит. Поэтому можно использовать вывод от devcon для обработки например в vbs скрипте, если сможешь. У меня время если будет, я попробую.

schnurok · 9 Фев 2007

я немноно скрипт переделал и он зароботол но не в том месте ишет где надо
он деактивируэт мою лан карту
я шас попробую ево подправгит может удастся так зделат штоб он искат протоколы в [Gerдte-Meneger] и там иh деактивировал
за любую помош буду блогодарен
так как со скриптом работаю в первый раз

schnurok · 9 Фев 2007

у меня к сожелению не получается
такшто еслив будет време помоги
буду очен рад

Technolog · 9 Фев 2007

Тот скрипт который я постил для devcon не переделать. Это совершенно другой принцип и методика. Ты позапускай и поиграйся с devcon.

schnurok · 9 Фев 2007

што такое вобше девкон

Поделиться