Op deze website gebruiken we cookies om content en advertenties te personaliseren, om functies voor social media te bieden en om ons websiteverkeer te analyseren. Ook delen we informatie over uw gebruik van onze site met onze partners voor social media, adverteren en analyse. Deze partners kunnen deze gegevens combineren met andere informatie die u aan ze heeft verstrekt of die ze hebben verzameld op basis van uw gebruik van hun services. Meer informatie.

Akkoord

Vraag & Antwoord

Anders (software)

Opstarten

Anoniem
jeroen512
10 antwoorden
  • Hallo,ik heb een pc waarmee ik temperatuur en luchtvochtigheid en schakelingen mee regel.Na stroom uitval start mijn pc weer automatisch op en daar bij opend hij ook het programma waarmee ik alles regel.Dit programma gaat pas aan het meten als ik zelf op f9 druk.Nou is mijn vraag of dit ook automatisch kan na opstarten van je pc? Alvast bedankt
  • Ik denk het wel, maar aangezien ik je programma niet ken en niet weet hoe je het automatisch laat starten, hierbij een voorbeeld dat excel opent en vervolgens op F1 "drukt", waardoor de help-functie wordt geopend.

    Open kladblok. Typ of copiëer en plak hetvolgende:

    Option Explicit
    Dim objShell
    Set objShell = CreateObject("WScript.Shell";)
    objShell.Run "excel"
    Wscript.Sleep 1500
    objShell.SendKeys "{F1}"
    Set objShell = Nothing
    WScript.Quit

    Sla het op als bv excelhelp.vbs. De naam is niet belangrijk, de extensie (.vbs) wel. let er bij het opslaan vooral op dat je het niet als tekstbestand opslaat, maar als "all files" (alle bestanden?) omdat hij anders wordt opgeslagen als excelhelp.vbs.txt, waarbij die laatste .txt verborgen kan blijven.
    Als je dit vbs-programma nu start wordt eerst Excel geopend, wacht het script 1500 ms, zodat excel open is en stuurt vervolgens de code van de F1-key, waardoor help opengaat.

    Je kunt Excel vervangen door de naam van jouw programma, eventueel met het complete pad ervoor als het anders niet gevonden wordt, en F1 door F9 vervangen. Als je het script dan in je startup folder zet zou het moeten werken.
    Als je programma langzaam opstart moet je misschien de 1500 verhogen.
  • Het programma is Profilab 4.0 deze word opgestart in het opstartmenu van xp
  • Kijk even in de snelkoppeling naar profilab in je opstartmap waarnaar deze verwijst. (rechtsklikken, eigenschappen, tabblad snelkoppeling) Daar staat dan bij Doel bv. C:\Program Files\Profilab 4.0\profilab.exe. Dit zet je in het VBS-bestand. Typ het wel exact over en laat de aanhalingstekens zoals hieronder staan. Het wordt dan dus:

    Option Explicit
    Dim objShell
    Set objShell = CreateObject("WScript.Shell";)
    objShell.Run "C:\Program Files\Profilab4.0\profilab.exe"
    Wscript.Sleep 1500
    objShell.SendKeys "{F9}"
    Set objShell = Nothing
    WScript.Quit

    Je noemt het vbs-bestand bv. profilabstart.vbs en zet het in de map Opstarten. De snelkoppeling naar profilab haal je daar weg, anders zal Profilab twee keer starten.
    (Je kunt profilabstart.vbs ook elders opslaan en in de map opstarten een snelkoppeling naar dit bestand maken)

    In plaats van dat profilab nu opstart, start het VB-Script. Dit opent eerst Profilab en stuurt er vervolgens F9 naartoe, waardoor de metingen beginnen.
  • Jan bedankt voor je reactie,maar ik krijg van windows script host een fout melding: C:\Documents and Settings\hhhh\Menustart\programma's\opstarten\profilabstart.vbs
    Regel: 4
    Teken: 1
    Fout: het systeem kan het bestand niet vinden
    code: 80070002
    bron: (nul)
    Ik zal het wel weer verkeerd doen of zo?!
  • Regel 4 is de regel die profilab doet opstarten. Je hebt dus niet het juiste pad naar profilab aangegeven of het bestand heet geen profilab.exe,

    Ik schreef al [b:60699c1010]bv.[/b:60699c1010] (bij voorbeeld!) C:\Program Files\Profilab 4.0\profilab.exe.
    Wat staat er als doel in de oorspronkelijke snelkoppeling naar profilab? Dat moet in deze regel tussen de aanhalingstekens (" ";) staan.
  • hoi Jan
    Regel 4,het doel heb ik overgenomen met kopieren en plakken.
    Doel:"C:\Program Files\ProfiLab-Expert40\KIKKERS\3.0.prj"
    En toch krijg ik deze fout melding van het script.
  • Aha, je opent dus niet het programma Profilab, maar een bestand. (dat in dat programma is gemaakt) Het is zo'n beetje hetzelfde als op een xxx.doc dubbelklikken. xxx.doc wordt dan vanzelf geopend in Word, omdat Windows "weet" dat het met Word geopend moet worden.
    VBS "weet" dat niet, dus dat moet erbij verteld worden.

    Met de gegevens die je tot nu toe hebt verstrekt kom ik tot het volgende. Ik kan het niet uitproberen omdat ik profilab niet heb.


    Option Explicit
    Dim objShell
    Set objShell = CreateObject("WScript.Shell";)
    objShell.run """C:\Program Files\ProfiLab-Expert40\ProfiLab40.exe""" &" " &"C:\Program Files\ProfiLab-Expert40\KIKKERS\3.0.prj"
    Wscript.Sleep 1500
    objShell.SendKeys "{F9}"
    Set objShell = Nothing
    WScript.Quit

    Kijk vooral even of Profilab40.exe inderdaad zo heet en of het pad er naartoe klopt. En ja, er staan driedubbele aanhalingstekens.

    Verder is iedere regel er één. Een lange regel, zoals de regel die begint met objshel.run en eindigt met 3.0.prj" mag dus niet halverwege afgebrolen worden. In kladblok kun je het automatisch afbreken van regels in het menu Format (Formaat in het Nederlands?) uitzetten. Daarna eventueel van hierboven knippen en in profilabstart.vbs plakken.
  • Jan bedankt het werkt helemaal top :D
  • Graag gedaan.
    Nu heb ik een vraagje, puur uit nieuwsgierigheid omdat het bestand in een map "kikkers" staat. Gebruik je dit programma om de omstandigheden in een aquarium (terrarium, palundarium) te monitoren of eventueel zelfs te beheren?

Beantwoord deze vraag

Dit is een gearchiveerde pagina. Antwoorden is niet meer mogelijk.