如何在程序启动默认浏览器与电子邮件系统

A：方法有二：
方法1：
//打开浏览器
string url
inet iinet_base
url = "http://pbsite.yeah.net"
GetContextService("Internet", iinet_base)
iinet_base.HyperlinkToURL(url)
//电子邮件
string url
inet iinet_base
url = "mailto:[e-mail]"
GetContextService("Internet", iinet_base)
iinet_base.HyperlinkToURL(url)
方法2：
//打开浏览器
string ls_ferryman,ls_null,ls_oper
ls_ferryman = "http://pbsite.yeah.net/"
setnull(ls_null)
ls_oper = "open"
ShellExecute(handle(parent),ls_oper,ls_ferryman,ls_null,ls_null,0)
//电子邮件
string ls_ferryman,ls_null,ls_oper
ls_ferryman = "mailto:[e-mail]"
setnull(ls_null)
ls_oper = "open"
ShellExecute(handle(parent),ls_oper,ls_ferryman,ls_null,ls_null,0)http://j.renren.com/album/1308220832162893213
http://j.renren.com/album/1308220832533164105
http://j.renren.com/album/1308220833298191342
http://j.renren.com/album/1308220833482978108
http://j.renren.com/album/1308220834087153933
http://j.renren.com/album/1308220834340841341
http://j.renren.com/album/1308220834547938474
http://j.renren.com/album/1308220835140661277
http://j.renren.com/album/1308220835399217575
http://j.renren.com/album/1308220835590727512
http://j.renren.com/album/1308220836249542677
http://j.renren.com/album/1308220836476299005
http://j.renren.com/album/1308220837102111730
http://j.renren.com/album/1308220837280835554
http://j.renren.com/album/1308220837557425960
http://j.renren.com/album/1308220848312587939
http://j.renren.com/album/1308220851375912691
http://j.renren.com/album/1308220852037104701
http://j.renren.com/album/1308220852237352401
http://j.renren.com/album/1308220852453819468
http://j.renren.com/album/1308220852598310613
http://j.renren.com/album/1308220853177892371
http://j.renren.com/album/1308220853337081016
http://j.renren.com/album/1308220853537711566
http://j.renren.com/album/1308220854163393204
http://www.56.com/p73/v_MTI0OTI2MDk0.html
http://www.56.com/p81/v_MTI0OTI2MTkw.html
http://www.56.com/p72/v_MTI0OTI2MjY5.html
http://www.56.com/p84/v_MTI0OTEyMTEz.html
http://www.56.com/p54/v_MTI0OTI2MzM5.html
http://www.56.com/p30/v_MTI0OTI2NDAz.html
http://www.56.com/p13/v_MTI0OTI2NDc0.html
http://www.56.com/p19/v_MTI0OTI2NTY4.html
http://www.56.com/p12/v_MTI0OTI2NjQ5.html
http://www.56.com/p24/v_MTI0OTI2NzQ5.html
http://www.56.com/p96/v_MTI0OTI2ODIx.html
http://www.56.com/p62/v_MTI0OTI2ODc1.html
http://www.56.com/p61/v_MTI0OTI2OTYy.html
http://www.56.com/p47/v_MTI0OTI3MDM2.html
http://www.56.com/p21/v_MTI0OTI3MDk4.html
http://www.56.com/p95/v_MTI0OTI3MTcy.html
http://www.56.com/p32/v_MTI0OTI3Mjg1.html
http://www.56.com/p90/v_MTI0OTI3MzQz.html
http://www.56.com/p51/v_MTI0OTI3NDgw.html
http://www.56.com/p39/v_MTI0OTI3NTU2.html
http://www.56.com/p18/v_MTI0OTI3NjIz.html
http://www.56.com/p37/v_MTI0OTI3NzMw.html
http://www.56.com/p57/v_MTI0OTI3ODM4.html
http://www.56.com/p20/v_MTI0OTI3OTc3.html
http://www.56.com/p28/v_MTI0OTI4MDcz.html
http://www.56.com/p33/v_MTI0OTI4MTY2.html
http://www.56.com/p35/v_MTI0OTI4MjU2.html
http://www.56.com/p26/v_MTI0OTI4MzM1.html
http://www.56.com/p39/v_MTI0OTI4NDM2.html
http://www.56.com/p11/v_MTI0OTI4NDk2.html
http://www.56.com/p54/v_MTI0OTI4NjI3.html
http://www.56.com/p41/v_MTI0OTI4OTY2.html
http://www.56.com/p30/v_MTI0OTI5MDQz.html
http://www.56.com/p95/v_MTI0OTI5MTk2.html
http://www.56.com/p42/v_MTI0OTI5MzE5.html
http://photo.163.com/q/6710137/?mid=174362069
http://photo.163.com/q/6710127/?mid=174362069
http://photo.163.com/q/6710113/?mid=174362069
http://photo.163.com/q/6710105/?mid=174362069
http://photo.163.com/q/6710099/?mid=174362069
http://photo.163.com/q/6710051/?mid=174362069
http://photo.163.com/q/6710032/?mid=174362069
http://photo.163.com/q/6710012/?mid=174362069
http://photo.163.com/q/6710000/?mid=174362069
http://photo.163.com/q/6702987/?mid=174362069
http://photo.163.com/q/6710518/?mid=174379042
http://photo.163.com/q/6710511/?mid=174379042
http://photo.163.com/q/6710506/?mid=174379042
http://photo.163.com/q/6710502/?mid=174379042
http://photo.163.com/q/6710496/?mid=174379042
http://photo.163.com/q/6710487/?mid=174379042
http://photo.163.com/q/6710477/?mid=174379042
http://photo.163.com/q/6710457/?mid=174379042
http://photo.163.com/q/6710451/?mid=174379042
http://photo.163.com/q/6710432/?mid=174379042