如何使用SHELLEXECUTE执行浏览器(20分)

Z

zhshf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-08-17

• #1

我想用shellexecute执行浏览器，不管是IE还是NETSCAPE，<br>我曾用过shellexecute启动邮件软件:<br>shellexecute(hinstance,'open','mailto:zhshf@263.net',nil,nil,sw_shownormal);<br>但我用下面这个句子就不行：<br>shellexecute(hinstance,'open','http://www.bupt.edu.cn',nil,nil,sw_shownormal);<br>请指教！！<br>

 

W

wuyi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-08-17

• #2

程序是对的, 只是不要在delphi中执行就可以.

 

Z

zhshf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-08-17

• #3

&gt;程序是对的, 只是不要在delphi中执行就可以.<br>我试了试，还是不行！

 

W

wuyi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-08-17

• #4

出什么样的错? 我的机器上肯定是行的.你的机器是什么环境?

 

Z

zhshf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-08-17

• #5

shellexecute执行的返回值是2；<br>我的环境是：NT4 workstation

 

S

sunstone

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-08-18

• #6

试一试下面的语句<br>ShellExecute(0,'open',PChar('http://www.bupt.edu.cn'),nil,nil,SW_NORMAL);<br>不好用告诉我.

 

P

pegasus

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-08-18

• #7

zhshf:<br>我试验了你的程序，没问题呀！<br>就是在Delphi中也没有问题<br>

 

N

nuke

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-08-18

• #8

呵呵，应该没错，刚才我才用过的说！

 

Z

zhshf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-08-18

• #9

还是不行。<br>不知是不是NT的原因。<br>我的源程序如下：<br>procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);<br>var<br>&nbsp; &nbsp;i:integer;<br>begin<br>&nbsp; &nbsp;if key=#13 then<br>&nbsp; &nbsp;begin<br>&nbsp; &nbsp; &nbsp; i:=shellexecute(hinstance,'open',pchar(Edit1.Text),nil,nil,sw_shownormal);<br>&nbsp; &nbsp; &nbsp; showmessage(inttostr(i));<br>&nbsp; &nbsp;end;<br>end;<br>

 

Z

zhshf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-08-18

• #10

我在Edit1里面写：http://www.bupt.edu.cn

 

柳

柳五公子

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-08-18

• #11

我在我的机器上试了一下，果真是这样：<br>shellexecute(hinstance,'open','http://freemail.263.net',nil,nil,sw_shownormal);不可以！<br>但shellexecute(hinstance,'open','c:/boot.ini',nil,nil,sw_shownormal);却可以！<br>返回值是2表示ERROR_FILE_NOT_FOUND？！

 

N

nuke

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-08-18

• #12

用这个吧<br>command:=<br>'c:/boot.ini'<br>'mailto:yysun@263.net'<br>'http://www.gislab.ecnu.edu.cn'<br>....<br>通吃！<br><br>Shellexecute(handle,nil,pchar(Command),nil,nil,sw_shownormal);

 

P

pegasus

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-08-18

• #13

Hehe, http://??? Should be http://

 

C

CJ

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-08-18

• #14

faint, 12 people answer such a question!

 

Z

zhshf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-08-18

• #15

感谢大家的热情帮助！

 

Z

zhshf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-08-18

• #16

接受答案了.