Asp ile Sms Gönderme

kont_dracula · 27/03/08, 16:50 PM

Asp ile Sms Gönderme

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

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,JM AIL 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:

( 
SOFTWING.AspTear 
MSXML2.ServerXMLHTTP 
MSXML2.ServerXMLHTTP.3.0 
MSXML2.ServerXMLHTTP 
AspNNTP.Conn 
AspHTTP.Conn 
xmlHTTP.Conn 
)

Bu componetlerden hepsi olmasa bile bir çogu her sunucuda yüklüdür.

Birde ö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:

<% 
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 
%>

Alıntı.

27/03/08, 16:50 PM	#1 (permalink)
kont_dracula Co Admin 1 Bilgi Üyelik tarihi: Feb 2008 Nerden: Bsg. Mesajlar: 3.779 Konular: 1220 Ruh Halim: 1 Karizma Rep Gücü : 9 Rep Puanı : 700 Rep Seviyesi : Teşekkür Sayısı : 731 Gösterdiği Tepki : 31 36 mesajına 40 kez tepki gösterildi 1 Reklam	Asp ile Sms Gönderme Asp ile Sms Gönderme Güncel bir kod örnegi olan sms gönderme; 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,JM AIL 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: ( SOFTWING.AspTear MSXML2.ServerXMLHTTP MSXML2.ServerXMLHTTP.3.0 MSXML2.ServerXMLHTTP AspNNTP.Conn AspHTTP.Conn xmlHTTP.Conn ) Bu componetlerden hepsi olmasa bile bir çogu her sunucuda yüklüdür. Birde ö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: <% 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 %> Alıntı. _______________________ Üye olup ailemize katılmak ve reklamsız bir forumdan yararlanmak isterseniz TIKLAYIN

Seçenekler
------------------------------------------------------------- Yazdırılabilir şekli göster Sayfayı E-Mail olarak gönder
Stil
Normal Hybrid-Şeklinde gösterime geç Ağaç şeklinde gösterime geç

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Üye olmadan konu gönderme	1 Haber	Diğer Kaynaklar	0	06/09/08 07:21 AM
telefondan telefona sis gönderme	1 Haber	Cep Telefonu Tema Resimleri	0	15/06/08 14:51 PM
Kontör gönderme nasıl yapılır	TrusTy	Bilgi Arşivi	0	30/03/08 14:00 PM
Ulaştırma Bakanı Binali Yıldırım'dan muhalefete ince gönderme: Hizmetlerimizden dola	1 Haber	Bölge Haberleri	0	10/03/08 14:00 PM
Büyükanıt'tan Erdoğan'a gönderme!!!	1 Haber	Türkiye	0	23/01/08 03:20 AM

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)