求一个基于Socket发短信的完整代码

[xiaochonglx]

求一个基于Socket发短信的完整代码。
希望前辈多多照顾我这个新手。
在此谢过了
[e-mail]

[半吊子全栈工匠]

基于Socket发短信？客户端还是服务器侧的程序呀

[Truman]

#include <ES_SOCK.H>
#include <e32base.h>
#include <gsmubuf.h>
#include <Gsmumsg.h>
#include <f32file.h>
#include <smsuaddr.h>
#include <smsustrm.h>
#include <aknnotewrappers.h>
#include <gsmuset.h>
#include <gsmupdu.h>
#include <Gsmuelem.h>



void SendSms()
{
RSocketServ sockServ;
User::LeaveIfError(sockServ.Connect());
CleanupClosePushL(sockServ);

RSocket socket;
User::LeaveIfError(
socket.Open(sockServ, KSMSAddrFamily, KSockDatagram, KSMSDatagramProtocol));
CleanupClosePushL(socket);

TSmsAddr smsaddr;
smsaddr.SetSmsAddrFamily(ESmsAddrSendOnly);
smsaddr.SetPort(smsaddr.Port() + 1);

User::LeaveIfError(socket.Bind(smsaddr));

RFs fileSession;
User::LeaveIfError(fileSession.Connect());
CleanupClosePushL(fileSession);

CSmsBufferBase *buffer = CSmsBuffer::NewL();
CleanupStack::PushL(buffer);


buffer->InsertL(0, _L("This is a test Message"));

TSmsUserDataSettings smsSettings;
smsSettings.SetAlphabet (TSmsDataCodingScheme::ESmsAlphabet8Bit);
smsSettings.SetTextCompressed(EFalse);

CSmsMessage *cSmsMessage = CSmsMessage::NewL(
fileSession, CSmsPDU::ESmsSubmit, buffer);
CleanupStack::Pop(buffer);
CleanupStack::PushL(cSmsMessage);
cSmsMessage->SetUserDataSettingsL(smsSettings);
cSmsMessage->SetToFromAddressL(_L("13811112222"));
cSmsMessage->SmsPDU().SetServiceCenterAddressL(_L("[phone]"));

RSmsSocketWriteStream writestream(socket);
writestream << *cSmsMessage;
writestream.CommitL();

TRequestStatus status;
TPckgBuf<TUint> sendBuffer;
socket.Ioctl(KIoctlSendSmsMessage, status, &sendBuffer, KSolSmsProv);
User::WaitForRequest(status);

CleanupStack::PopAndDestroy(cSmsMessage);
CleanupStack::PopAndDestroy(&fileSession);
CleanupStack::PopAndDestroy(&socket);
CleanupStack::PopAndDestroy(&sockServ);

}