Solved

opening internet explorer without toolbar

Posted on 2002-04-08
14
402 Views
Last Modified: 2012-08-14
Hello,
Is there a way to open internet explorer with
shellexecute command (from vb)  without the toolbar

thank you
0
Comment
Question by:Lokresia
14 Comments
 
LVL 1

Expert Comment

by:COAtheGREAT
ID: 6925138
This is without using shallexecute if it helps

include reference on Microsoft Internet Controls

  Dim ie As InternetExplorer
 
  Set ie = New InternetExplorer
 
  ie.ToolBar = False
  ie.Visible = True
0
 
LVL 43

Expert Comment

by:TimCottee
ID: 6925139
Use this:

Shell "iexplore -k http://www.geocities.com/TimCottee



0
 
LVL 16

Expert Comment

by:Richie_Simonetti
ID: 6925391
Tim, for a strange reason you code doesn't works in my w2k...
0
Free Tool: IP Lookup

Get more info about an IP address or domain name, such as organization, abuse contacts and geolocation.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

 
LVL 43

Expert Comment

by:TimCottee
ID: 6925438
I guess you got a 53 error, so did I when I actually tried it, I guess VB doesn't search the system's path for the file so you need to full path to ie's executable:

Shell "\program files\internet explorer\iexplore -k http://www.geocities.com/TimCottee"

This basically launches IE in kiosk mode with none of the toolbars etc.
0
 
LVL 16

Expert Comment

by:Richie_Simonetti
ID: 6925582
Yeah, i think so too but maybe ie is not installed in that path so hard code it is not a good idea.
0
 
LVL 5

Expert Comment

by:kcm76
ID: 6925830
i guess -k will open in fullscreen mode.

kcm
0
 
LVL 16

Expert Comment

by:Richie_Simonetti
ID: 6926343
Lokresia, any progress, feedback on this?
0
 

Author Comment

by:Lokresia
ID: 6927657
thank you for your help but I need the command
for shellexecute and not for shell
0
 
LVL 16

Expert Comment

by:Richie_Simonetti
ID: 6928230
Hummmm...
You can't use in that way. I mean:

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Private Sub Form_Load()
ShellExecute Me.hwnd, "open", "http://www.geocities.com/TimCottee", "-k", vbNullString, vbNormal
End Sub

doesn't works nor

Private Sub Form_Load()
ShellExecute Me.hwnd, "open", "-k http://www.geocities.com/TimCottee", vbnullstring, vbNullString, vbNormal
End Sub

I think COAtheGREAT has the simplest way. If you don't want to use references, try with:
dim ie as object
Set ie = createobject("shdocvw.InternetExplorer")
 
 ie.ToolBar = False
 ie.Visible = True


0
 
LVL 16

Expert Comment

by:Richie_Simonetti
ID: 6928244
nor:
Private Sub Form_Load()
ShellExecute Me.hwnd, "open", "iexplore", "-k http://www.geocities.com/TimCottee", vbNullString, vbNormal
End Sub
0
 
LVL 16

Expert Comment

by:Richie_Simonetti
ID: 6928250
maybe....with full path (which i don't like it)
Private Sub Form_Load()
Dim ret As Long
ret = ShellExecute(0, "open", "C:\Archivos de programa\Internet Explorer\iexplore.exe", "-k http://www.geocities.com/TimCottee", vbNullString, vbNormalFocus)
End Sub
0
 
LVL 16

Accepted Solution

by:
Richie_Simonetti earned 40 total points
ID: 6928267
So rry for so many post:
Use this find path to iexplore and pass it to shellexecute:

http://www.mvps.org/vbnet/code/system/findexecutable.htm
0
 
LVL 49

Expert Comment

by:DanRollins
ID: 7643028
Hi Lokresia,
It appears that you have forgotten this question. I will ask Community Support to close it unless you finalize it within 7 days. I will ask a Community Support Moderator to:

    Accept Richie_Simonetti's comment(s) as an answer.

Lokresia, if you think your question was not answered at all or if you need help, just post a new comment here; Community Support will help you.  DO NOT accept this comment as an answer.

EXPERTS: If you disagree with that recommendation, please post an explanatory comment.
==========
DanRollins -- EE database cleanup volunteer
0
 
LVL 1

Expert Comment

by:kodiakbear
ID: 7673251
Moving to the PAQ

kb
Experts Exchange Moderator
0

Featured Post

Free Tool: Port Scanner

Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
VBA open file from excel cell 4 44
Saving history changes to sub form 4 48
clicking a shape in a frame array vb6 3 46
Sub or Function is not defined 6 43
If you have ever used Microsoft Word then you know that it has a good spell checker and it may have occurred to you that the ability to check spelling might be a nice piece of functionality to add to certain applications of yours. Well the code that…
If you need to start windows update installation remotely or as a scheduled task you will find this very helpful.
Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…

860 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question