Jump to content

WinXP / Internetexplorer VBScript


Der letzte Beitrag zu diesem Thema ist mehr als 180 Tage alt. Bitte erstelle einen neuen Beitrag zu Deiner Anfrage!

Recommended Posts

Hi!

 

Folgendes Problem:

 

Ich möchte den IE starten und eine Seite laden. Der IE soll ohne Toolbar gestartet werden und maximiert.

Funktioniert unter Win2000 perfekt mit dem VB Script:

 

'SCRIPT START

SET MYSHELL = CreateObject("Wscript.Shell")

SET IE = CreateObject("InternetExplorer.Application")

page = "http://sbs2003:82/"

WITH IE

.toolbar=0

.navigate page

.visible=true

END WITH

SET MyShell = CreateObject("Wscript.Shell")

Set objShell = WScript.CreateObject("WScript.Shell")

objShell.AppActivate("Internet Explorer")

objShell.Sendkeys "% x"

'SCRIPT ENDE

 

Unter WinXP funzt es auch, allerdings nur solange kein anderes Internetexplorer Fenster offen ist. (denn da wird das 1ste offene maximiert und nicht das neu geöffnete)

 

Ideen? Oder andere LÖsungsvorschläge?

 

lg

 

Undying

Link to comment

Hi,

 

also bei mir unter XP mit IE und allen Hotfixes macht das Script genau das was es soll: ein neues IE Objekt erstellen (sprich: neues Fenster) und öffnet die Seite.

Was ich spontan nicht hinbekomme ich das maximieren des Fensters. Das könnte man vielleicht noch durch Setzen der Eigenschaften Width und Height hinbekommen und vorheriges Auslesen der Bildschirm-Höhe und Breite.

Eine Alternative wäre ".fullscreen=true", aber dann ist es wirklich fullscreen :)

 

Solltest Du bei Dir Virenscanner einsetzen könnte es passieren, daß der Alarm schlägt. Der Norton Antivirus meldet Sicherheitsrisiko bei den Sendkey-Commands...

 

Gruß

Andre

Link to comment

Hi!

 

Danke für die Antworten!

 

Das Script funktioniert auch und öffnet die Seite! Nur wenn bereits ein anderes Internetexplorerfenster offen ist, bekommt dieses via Sendkey das maximieren zugewiesen und stellt meine Seite in den Hintergrund,- natürlich nicht sinn der Sache! Genauso wie es nicht Sinn der Sache ist dem Benutzer zuvor alle anderen Internetseiten die er gerade offen hat zuzumachen : D

 

fullscreen bringt mir leider nix ;-(

 

Und soweit ich weiß gibt es keine Möglichkeit die "viewable" width und height auszulesen mit VBScript. Also ohne Taskleiste etc.

 

lg

 

Undying

Link to comment

Hi Undying,

 

versuch mal folgende zwei Sachen vor dem SendKey's Commad.

 

objShell.AppActivate(IE)

(oder)

objShell.AppActivate(IE.HWND)

 

Ich weiß nicht, ob das Objekt ausreicht und ich weiß nicht, ob er den Handle schluckt (weil er eigentlich ne Proces ID erwartet).

 

Aber für'n weiteren Test reicht das ja schon mal...

 

Andre

Link to comment
Der letzte Beitrag zu diesem Thema ist mehr als 180 Tage alt. Bitte erstelle einen neuen Beitrag zu Deiner Anfrage!

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...