Új hozzászólás Aktív témák

• ArchElf addikt

  #1178

  #1177 csimmasz

  2010-05-03 13:25:38

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  ArchElf

  addikt

  #1177 csimmasz

  #1177 csimmasz

  Sziasztok szeretnék segitséget kérni vb script ügyben.
  Van egy letöltögépem és egy Nas-om amire menti a dolgokat.

  Azt szeretném elérni hogy a pc-n a utorrent csak akkor induljon el hogyha a nas-on az állományok elérhetőek!(vagyis be van kapcsolva és elérhető a hálózaton)

  Elkerülendő hogy a utorrent netalálja az állományokat majd legközelebb ujra kelljen ellenőriznie mindet.

  Próbáltam magamtól utánna nézni de nekem kinai,pedig annó basic-ban bepötyögtünk dolgokat c64-en,profiknag gondolom 2-perc.
  Egy szkriptet valaki belinkelt a másik topikban ami egy program inditást késleltet,gondolom ez sem lehet túl bonyolult.

  Előre is köszi.

  Option Explicit
  'strFolder -> kívánt könyvtárnevet beleírni
  'fShell -> utorrent.exe teljes elérési útvonala (dupla quote kell, ha az elérési útvonal tartalmaz space-t)
  
  Dim sFolder, oFSO
  Dim oShell, fShell
  sFolder = "S:\Share"
  fShell = """c:\ProgramFiles\uTorrent\uTorrent.exe"""
  Set oFSO = CreateObject("Scripting.FileSystemObject")
  While not oFSO.FolderExists(strFolder)
  WScript.Sleep 30000
  Wend
  Set oFSO = Nothing
  WScript.Sleep 5000
  Set oShell = WScript.CreateObject ("WScript.Shell")
  oShell.run fShell
  Set oShell = Nothing
  A két változó értékét beállítod:
  - share könyvtár helye (célszerű map-elve meghajtóra)
  - torrent program elérési útvonala

  A script fél percenként megnézi, hogy elérhető-e a share, amikor igen, elindítja a programot.

  AE

Új hozzászólás Aktív témák