HSPTV!掲示板

hspsockでメールの本文とタイトルを別々に取得したいです。
ですが、どうしたらいいかわかりません。

だれか教えてくれませんか。サンプルなどよろしくお願いします!

なぜその必要があるのか?
理由が知りたい

わかりました...
私はメールソフトを作っていて
受信したメールのタイトルと本文が取得できなくて困っているからです。

POP3コマンドにヘッダーだけを取得するコマンドがありますので使用し
その中から件名を取り出せば出来ます。
本文のみはありません

TOPコマンドであることはわかったのですが、sockputしてからsockgetして
sockgetした内容を切り出そうとしても余計な部分がついてきて困っています。
質問ばかりでごめんなさい。

余計な部分ってどういうのですか？
バッファオーバーフローの可能性があります

ヘッダーはCRLF区切りになっています。

ていうか、ISO-2022-JP(JIS)からSJISに変換しなくちゃ使えなくね?

今、こんな感じです。

	#include"hspsock.as"
	sdim GetLog,1024
	PopServer="pop.mail.yahoo.co.jp"
	PopPort=110
	
	AccountName="アカウントのユーザーネーム"
	AccountPass="アカウントのパス"

	sockopen 0,PopServer,PopPort
	sockget GetLog,1024,0
	
	sockput"user "+AccountName+"\n",0
	sockget GetLog,1024,0
	
	sockput"pass "+AccountPass+"\n",0
	sockget GetLog,1024,0
	
	sockput"stat\n",0
	sockget GetLog,1024,0
	getstr MailCount,GetLog,4,' '
	
	repeat int(MailCount)
	sockput"TOP "+cnt+" 0\n",0
	sockget GetLog,1024,0
	dialog GetLog
	await 1
	loop
	sockput"quit\n",0

だれか本当に答えてください!
困っているんです!!!

答える前にこちらから質問願いたい。
質問するたびに名前を変えるのはなぜ？

とりあえずモジュール化してみる。

#module PopComm

#include "hspsock.as"

#deffunc PopCmdInit str _PopServerName, int _BufSize
	
	strPopServerName = _PopServerName
	PortId = 110
	
	BufSize = _BufSize
	sdim strResponse, BufSize
	
	return

#deffunc PopOpen
	
	sockopen 0, strPopServerName, PortId
	sockget strResponse, BufSize, 0
	
	return strResponse

#define global ctype PopGetRes(%1 = BufSize@PopComm) _PopGetRes(%1)
#defcfunc _PopGetRes int _Size
	
	if (_Size > BufSize) : memexpand strResponse, _Size
	
	sockget strResponse, _Size, 0
	
	return strResponse
	
#deffunc PopSendCmd str _cmd
	
	sockput _cmd + "\n", 0
	
	return PopGetRes()
	
#global

strUserName = ""	//ユーザー名
strPassword = ""	//パスワード

PopCmdInit "pop.mail.yahoo.co.jp", 1024

PopOpen
mes refstr

PopSendCmd "USER " + strUserName
mes refstr
PopSendCmd "PASS " + strPassword
mes refstr

PopSendCmd "STAT"
_refstr = refstr
split _refstr, " ", temp, strMailNum
MailNum = int(strMailNum)

PopSendCmd "RETR " + MailNum
mes refstr

wait 100
color 255, 255, 255 : boxf
pos 0, 0

strRes = PopGetRes(6000)
mesbox strRes, 640, 480, 0, 0

>>通りすがりさん
とうふさんと私は関係ありません。

じゃあなぜ質問者は「ミミズ」なのに今「とうふ」が回答を求めているの？
しかも明らかに感嘆符の使い方が同じだし、名前の変え方も一定。

過去に使用されたと思われる名前
・domino
・シャックリ
・こしあん

サンプルを求めるばかりでなく自分で調べることが大事。

>>通りすがりさん
多分私と同じ悩みを持っていたのでしょう。

>>過去に使用されたと思われる名前
>>・domino
>>・シャックリ
>>・こしあん
いいえ、この方々の名前は使用していません。
掲示板に質問するのは初めてなので。

>>とうふさん
ここは私が質問しているところです。
なるべく割り込まないようにおねがいしますね。