1. sayfa
<% Dim mesaj,numara,kod,xml,strlink,strpost mesaj = CStr(Request.Form("mesaj")) numara = CStr(Request.Form("numara")) kod = CStr(Request.Form("kod")) Set xml = Server.CreateObject("MSXML2.ServerXMLHTTP") strlink = CSTR("https://nokiags.wdsglobal.com/bookmarkmanual?contractId=191&phoneId=408&captchaEnabled=true&step=details.vm&bookmarkManualName=edxsen_&siteLanguageId=118&sendButton=true") strpost = CSTR("contractId=191&phoneId=408&captchaEnabled=true&step=details.vm&sendButton=true&captchaKey="+kod+"&mobileNumber="+numara+"&bookmarkManualURL="+mesaj) xml.Open "POST",strlink,false xml.Send(strpost) Response.Write xml.responseText Set xml = Nothing 'Response.Write "<link href='includes/sorunlu.css' rel='stylesheet' type='text/css'>" 'Response.Write "<meta http-equiv=Content-Type content='text/html; charset=iso-8859-9'>" 'Response.Write "SMS has been sent." %>
DH forumlarında vakit geçirmekten keyif alıyor gibisin ancak giriş yapmadığını görüyoruz. Üye olduğunda özel mesaj gönderebilir, beğendiğin konuları favorilerine ekleyip takibe alabilir ve daha önce gezdiğin konulara hızlıca erişebilirsin.
asagidaki gibi denedim fakat post ettiğim bilgileri düzgün birleştiremedim galiba... ad=aaa&numara=0000 gibi yapmayı denedim ama olmuyor.
DH forumlarında vakit geçirmekten keyif alıyor gibisin ancak giriş yapmadığını görüyoruz.
Üye Ol Şimdi DeğilÜye olduğunda özel mesaj gönderebilir, beğendiğin konuları favorilerine ekleyip takibe alabilir ve daha önce gezdiğin konulara hızlıca erişebilirsin.