怎样打开默认的电子邮件程序~

Question

想要单击一个地方能打开系统默认的邮件程序发邮件~
应该怎么写？是用shell吗？

Answer 1

Public Const SW_SHOWNORMAL = 1Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _
        ByVal hWnd As Long, _
        ByVal lpszOp As String, _
        ByVal lpszFile As String, _
        ByVal lpszParams As String, _
        ByVal lpszDir As String, _
        ByVal FsShowCmd As Long) _
        As Long
Private Declare Function GetDesktopWindow Lib "user32" () As Long
Call ShellExecute(GetDesktopWindow, "Open", strFileName, "", "c:", SW_SHOWNORMAL)
按默认方式打开文件

Answer 2

Option Explicit
'API函数声明
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 LongPrivate Sub Command1_Click()
    ShellExecute Me.hWnd, "open", "mailto:[email protected]", vbNullString, vbNullString, 3
End Sub

Answer 3

Up在推存一个VB小工具软件名称：VB代码计算器
软件类型：编程工具
编程环境：VB6 + SP5
适用系统：Win9x/2k/XP■ 软件介绍本程序能显示出你编写的VB源代码一共写了多少行，同时也支持其他类型的文件计算。特点：①界面美观，操作方便，你只需拖动你保存好的VB工程（组）文件到本程序窗口就可显示出源代码的总行数。②能自动分析VB工程（组）内包含的文件（这是可选的，也可以不自动分析并把他当作普通文件计算），并分别计算出每个文件所包含源代码的行数。③能自动隔离VB文件中由VB自动生成的代码，只计算用户输入的源代码，并可选择是否要排除空行或注释行的计算。④支持计算非VB文件，如文本文件、ini文件等。计算该类文件时只能排除空行的计算，其他只要不是空行都会累加到总行数中。⑤可暂停正在计算中的任务。⑥可以保存计算结果和被计算文件列表为文本文件，方便以后查询或打印输出。
下载地址：
华军软件 http://www.onlinedown.net/soft/7545.htm
天空软件 http://www.skycn.com/soft/12423.html