请教一个VB菜鸟问题？

MYCAOG

请教一个VB菜鸟问题？

我刚学VB编程，想自己写一个小软件，现遇到问题，想请教：
1、画一个COMMAND按钮，我想点一下这个按钮就让程序自动登陆到某一个网址。比如PYG官方论坛。怎么写？
2、就是想给我写信，一点按钮就打开写电邮的程序。而且默认是给指定的邮箱，比如PY大哥的邮箱。
就这两个小问题，请哪位会的帮帮忙啊，我在等的，先谢了！

herotear

1.Shell "explorer.exe https://www.chinapyg.com"

herotear

2.

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 Command1_Click()
ShellExecute Me.hwnd, "open", "mailto:xxx@xxx.com?cc=xxx1@xxx.com&bcc=xxx2@xxx.com&subject=aaa&body=xxxx", "", "", 1
End Sub

野猫III

原帖由 herotear 于 2006-5-22 09:30 发表
2.

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

:victory: :victory:

飘云

建议你下载一本 API速查手册 for VB 看看～～

lhl8730

今天又学了一招，谢谢。

bfqyygy

老大说的没错.先学习一下~

JOYSIDE

最简单的不用API的...
Dim ret As String
ret = Shell("explorer  网站", 1)
ret = Shell("explorer  mailto:邮箱", 1)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

godhack

原帖由 herotear 于 2006-5-22 09:30 发表
2.

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

真的可以，嘿嘿，不错哦，不过可以解释下 ShellExecute 是什么意思吗？

战佛

Shell 函数

执行一个可执行文件,返回一个 Variant (Double),如果成功的话,代表这个程序的任务 ID,若不成功,则会返回 0.


JOYSIDE 如果在解释的清楚点的话会更好，呵呵