[XP] Startvertragertje, bestaat dat?

[Verwijderd]

Wazdatnouweer?

Een stukje software dat er voor zorgt dat programma's die resident draaien wat later worden opgestart zodat je systeem sneller beschikbaar is en niet eindeloos staat te prutten. Bestaat dat?

Voorbeeld:
Zonealarm en virusscan moeten wel meteen draaien.
Waar ik op kan wachten, wat best na een paar minuten pas resident mag gaan is:
Dragon
DiskKeeper
Nerospul
Geluid-en beeldmanagers
Activesync


Taskmanager kan niet 'vertragen'. Ik heb al 's rondgekeken op Download.com maar ook daar is alles erg wazig omschreven. Anyone?
Rob

[Iblies]

Je kunt kijken bij services en een heleboel uitzetten, meeste heb je toch niet nodig. Bespaart tijd, systeem start sneller op, en houd sneller op met 'pruttelen' je hebt meer geheugen vrij.
Zijn al een boel topics over geweest, effe de search gebruiken.

[Pommi]

Ik neem aan dat dit bij velen hoog in het verlanglijstje staat...
Zover ik weet, bestaat dit niet...

Schakel zoveel mogelijk dingen uit, die je soms maar gebruikt. En zet ze ff aan als je ze wilt gebruiken.

[Spider.007]

het is in XP mogelijk om een tooltje van microsoft te runnen om je opstartproces wat gelijkmatiger te verdelen.....

[Verwijderd]

Zoek iemand met een visual studio en vraag om een programmaatje,

Zet daar in een Sleep ( x );

gebruik dit programmaatje om vanuit een batch bestand je programma's te starten.

dus

startapp1
sleep ( 1000 )
startapp2
sleep ( 1000 )
startapp3

[Kuhlie]

Gevonden! Ik had dit al eens zelf gemaakt, heb het even aangepast zodat het ook met variabele tijd werkt (wachttijd is instelbaar).

code:

Option Explicit

Dim Progs As New Collection

Private Sub Form_Load()
If UBound(Split(Command)) <> 1 Then
  MsgBox "Start met: ""SlowBoot 20 10"" om eerst 20 seconden te laten wachten, dan 10 tussen elk programma. Maximaal 65 seconden voor beide waarden."
  Unload Me
Else
  Timer1.Interval = Val(Split(Command)(0)) * 1000
End If
Dim t As String
If Dir("progs.ini") <> "" Then
  Open "progs.ini" For Input As #1
    Do Until EOF(1)
      Line Input #1, t
      If t <> "" Then Progs.Add t
    Loop
  Close #1
Else
  MsgBox ("Sla een lijstje met programma's op in progs.ini")
  Unload Me
End If
End Sub

Private Sub Timer1_Timer()
Timer1.Interval = Val(Split(Command)(1)) * 1000
If Progs.Count = 0 Then Unload Me: Exit Sub
Start Progs(1)
Progs.Remove 1
End Sub

Private Sub Start(s As String)
If InStr(s, ":") = 2 Then ChDrive Left(s, 2)  'juiste harddisk
If InStr(s, "") > 0 Then ChDir Left(s, InStrRev(s, "") - 1) 'juiste map
Shell s, vbNormalNoFocus  'programma starten
End Sub

Het is smerig in elkaar gehackt, maar het werkt wel. VB6 overigens.

Download: slowboot met source.

[ Voor 33% gewijzigd door Kuhlie op 09-12-2003 23:02 . Reden: 1) URL toegevoegd 2) url stuk 3) en weer gefixt ]

[elevator]

Je had ook kunnen [google=sleep.exe] - dat doet ook wat je wil - als in, het wacht een 'x' aantal seconden

[ Voor 26% gewijzigd door elevator op 09-12-2003 23:20 ]

[mhr-zip]

bootvis, is wel niet wat je zoekt, maar toch wel een goed proggie.

[Verwijderd]

Tjee!

Ga het van boven naar beneden beantwoorden.
Iblies. Pommie: Ik heb wel alle progs nodig, en ze telkens handsmatig starten is toch wel onhandig, dus dat is het niet. Voorbeeldje, Dragon 7 starten duurt dan veeel langer, en DiskKeeper (fantastisch programma) moet WEL starten maar dus later.

Andere progjes, ga het allemaal even proberen en laat je weten!

Rob

[Verwijderd]

Kuhlie, fantastic!
Twerkt vrijwel helemaal, alleen verslikt-ie zich als er een parameter meegegeven moet worden met wat extra dingen: enkele en dubbele aanhalingstekens. Een gewone parameter gaat wel, bijvoorbeeld -c. Maar deze dus niet:

D:Utils\Disks\DataKeeper\DataKeeper.exe - c "D:Utils\Disks\DataKeeper\Systeem.dks"

Maar het is exact het idee wat ik bedoelde, klasse!

De tweede uitdaging wordt dan natuurlijk: zou je die truc kunnen uithalen met dingen die in het register CurrentVersion\Run staan?

(durf 't bijna niet te vragen...)
Rob

[ Voor 27% gewijzigd door Verwijderd op 10-12-2003 00:30 ]

[Verwijderd]

Ik had ook nog wat liggen en heb het aangepast voor algemeen gebruik.
Kijk maar of het wat voor je is.
De gegevens uit de Run keys in je register kan je gewoon overnemen in de execute.ini file van dit programma en dan in je register verwijderen.



Downloaden: Setup-StartDelay.exe

(VB6, MSHFlexGrid.ocx)

[ Voor 26% gewijzigd door Verwijderd op 10-12-2003 17:39 ]

[Verwijderd]

Eh, Remark, ik kannernietbij! Moet ingelogd zijn al jij, dus.
Rob

[Verwijderd]

Linkjes zijn nu gefixt in mijn eerdere post

[Verwijderd]

Remark,

ziet er ook wel goed uit, maar t werkt niet: er mist volgens het programma een MSHFLXGD.OCX of een van zijn dependencies is niet geregistreerd. Klopt, staat nergens op mijn systeem... Dat staat ook op je posting, is het soms een onderdeel van VB6 dat ik moet hebben? (heb ik dus niet, VB6).

Rob

[ Voor 22% gewijzigd door Verwijderd op 10-12-2003 17:18 ]

[Verwijderd]

Ok, ik heb er nu dan maar een Setup voor gemaakt incl. de MSHFLXGD.OCX.
Zie 1e bericht voor de nieuwe setup link.

[Verwijderd]

Remark,

't werkt echt als een zonnetje! Nu begint-ie gewoon met de essentiële dingen en pas na een paar minuutjes de rest. Dan ben ik al lang met andere dingen bezig.

Je komt in mijn personal hall of fame...

Groet,
Rob

[Verwijderd]

Leuk om te horen en nog veel plezier ermee
Ik ben het programma nu zelf ook aan 't gebruiken en het is handiger dan ik dacht
(bijv. om programma's in een bepaalde volgorde te kunnen starten)

[Verwijderd]

Doen banketbakkers ook nog steeds, zo overtuigd zijn ze van hun eigen producten.
En softwarebakkers ook, natuurlijk.
Rob

[Rwin]

http://www.r2.com.au/software.php?page=2&show=startdelay

ik weet niet of dit een andere is als hierboven geschreven.
Hij werkt iig erg goed. Hier word er volop gebruik van gemaakt.

edit: Die ik hier post is zeker een andere. Erg simpel met een GUI.
Foolproof en geen klopwerk nodig.

Succes!

[ Voor 25% gewijzigd door Rwin op 12-12-2003 11:26 ]

[Verwijderd]

Ah, al m'n harde werk voor niets
Dat is idd een mooi programma van r2 studios, scheelt typewerk en is foolproof.