「メーラーを起動する」の編集履歴(バックアップ)一覧はこちら
「メーラーを起動する」(2010/09/02 (木) 00:13:05) の最新版変更点
追加された行は緑色になります。
削除された行は赤色になります。
#asciiart(blockquote){
Dim mailmes[44444] As Byte
Dim add[444] As Byte
Dim taitle[444] As Byte
Dim body[4444] As Byte
lstrcpy(add, "zoht6fk@55mail.jp")
lstrcpy(taitle, "[重要]至急連絡ください")
lstrcpy(body, "5万円")
wsprintf(mailmes, "mailto:%s?subject=%s&body=%s", add, taitle, body)
ShellExecute( 0, "open", mailmes, 0, 0, SW_SHOW)
}
#asciiart(blockquote){
Dim mailmes[44444] As Byte
Dim add[444] As Byte
Dim taitle[444] As Byte
Dim body[4444] As Byte
lstrcpy(add, "aaa@bbb.ccc")
lstrcpy(taitle, "[重要]至急連絡ください")
lstrcpy(body, "5万円")
wsprintf(mailmes, "mailto:%s?subject=%s&body=%s", add, taitle, body)
ShellExecute( 0, "open", mailmes, 0, 0, SW_SHOW)
}