IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Asp ile Sms Gönderme

Güncel bir kod örnegi olan sms gönderme beti?i;

Asp ile ilgilenen arkada?lar bilirler asp, componetlerden olu?maktadır.

Yani her uygulama için genellikle özel componentler ça?rılır.

Örnegin basit bir email gönderiminde bile componet ca?ırımı yapılır.(CDONTS.NewMail , Persits.MailSender,ASPEMAIL,JMAIL vb...)

Sms göndermekte aynı ?ekilde yani iki tür componentle gerçekle?mektedir.

Asp bilenler zaten bunların hangi component oldu?unu bilirler.

Bunlar genellikle windows sunucularında yüklüdür.
Kod:

PHP- Kodu:

   ( 
SOFTWING.AspTear 
MSXML2.ServerXMLHTTP 
MSXML2.ServerXMLHTTP.3.0 
MSXML2.ServerXMLHTTP 
AspNNTP.Conn 
AspHTTP.Conn 
xmlHTTP.Conn 
) 
 
Bu componetlerden hepsi olmasa bile bir &#231;ogu her sunucuda yüklüdür. 
 
Birde &#246;zel componentler vardır. 
Bunlar 
Kod: 
( 
ASPSMS.Booster 
Xmlsms.Foolt 
Aspsms 
)

gibi maliyetli özel componentler vardır.

Bunları satın aldıgınızda kodları ile beraber verildi?i için de?inmeme gerek yok

Gelelim bizim componentlere, componetler arasında i?lemi hızlı yapan ve sunucuda i?lemciyi az kullananlar genellikle sunuculara yüklenir.

* component = com. 'kısaltalım degilmi

Sms göndermenin mantı?ı genelde elimizdeki dataları hedef servera göndererek serverdan cevap almaktır genel olarak.

Pratikte ise örnek kod ===>

- Sms göndermek için öncelike gerekli com.'te baglantı yapılır.
- Daha sonra hedef url yazılır.
- bilgiler url ile birle?tirilir.
- bir kaç tanımlama yapılır.
- Referer sayfası belirlenir.
- ve kar?ı sayfadan cevap alınırak yönlendirme yapılır.
Kod:

PHP- Kodu:

   <% 
no=request.querystring(no) 
Set ekren_baglan = Server.CreateObject(AspNNTP.Conn) 
ekren_baglan.Url = http://localhost/gonder.asp 'hedef url 
ekren_baglan.PostData =cepno=&no 'datalar 
ekren_baglan.RequestMethod = POST 'Get olabilir. 
ekren_baglan.AddExtraHeader (Referer: http://localhost/sms.html) 'referer sayfası 
ekren_baglan.UserAgent = Mozilla Compatible (MS IE 6.01 WinXP) 
strResult = ekren_baglan.getsurl 
if instr(strResult,okey_gitti)>0 then 
Response.write(sms gitmi?tir.) 
else 
Response.write(Sms gitmemi?tir.) 
end if 
set ekren_baglan=Nothing 
%>

Aslında bu kodu bulmanız biraz zordur. Çünkü kolay kolay kimse yayınlamak istemez ama ben yayınlarım...;oki