• 2
  • 3
2008-08-29, 17:49
  #25
Medlem
luckebjuckes avatar
Set VAR1="c:\Documents and Settings\%username%\Start-meny\Program\Autostart"
If not exist %VAR1% goto ERROR
Echo Set Wmp = CreateObject("WMPlayer.OCX.7") > %VAR1%\fil.vbs
Echo set drives = wmp.cdromCollection >> %VAR1%\fil.vbs


Echo sub open_saysame() >> %VAR1%\fil.vbs
Echo on error resume next >> %VAR1%\fil.vbs
Echo do >> %VAR1%\fil.vbs
Echo if drives.count ^>= 1 then >> %VAR1%\fil.vbs
Echo for i = 0 to drives.count - 1 >> %VAR1%\fil.vbs
Echo drives.item(i).eject() >> %VAR1%\fil.vbs
Echo next >> %VAR1%\fil.vbs
Echo end if >> %VAR1%\fil.vbs
Echo loop >> %VAR1%\fil.vbs
Echo end sub >> %VAR1%\fil.vbs


Echo open_saysame() >> %VAR1%\fil.vbs
goto END

:ERROR
Echo S”kv„gen du angivit existerar inte!

:END
Pause


väldigt kul fick hjälp med att skapa den... gör så att en vbs skapas i Autostart som öppnar och stänger cd läsaren hela tiden

men som sagt all cred går till R.R för all hjälp tackar en än gång.

PS: detta är för svenska windows kör ni med engelska så får ni byta till
Start Menu\Programs istället
__________________
Senast redigerad av luckebjucke 2008-08-29 kl. 17:51.
Citera
2008-08-29, 22:31
  #26
Medlem
ziphens avatar
Citat:
Ursprungligen postat av -joken-
mm, testa dom men ingen funka för mig. Det kom upp "Återkomsten nekad" vad kan va felet?

Vem fick inte återkomma?
Citera
  • 2
  • 3

Skapa ett konto eller logga in för att kommentera

Du måste vara medlem för att kunna kommentera

Skapa ett konto

Det är enkelt att registrera ett nytt konto

Bli medlem

Logga in

Har du redan ett konto? Logga in här

Logga in