Merhaba Asp.net dilinde yazılmış üyelikli ilan sitem var. Paralı üyelik ile çalışıyor. Telefon numaralarını ve mesaj yollamak için paket almaya yönlendiriyor. Talep mesajı yollamak ücretsiz normal mesaj yollamayı da ücretsize nasıl çeviririm.
If (dtUyeKontrol.Rows.Count = 0) Then txtMesaj.Visible = False txtMesajBaslik.Visible = False Else litEPosta.Text = dtUyeKontrol.Rows("0")("EPosta") End If
Dim dtUyePaketleri As DataTable = UyePaket.UyePaket(CInt(litAlanID.Text.ToString)) If (dtUyePaketleri.Rows.Count > 0) Then For Each dr As DataRow In dtUyePaketleri.Rows Dim dtPaketler As New DataTable Dim cmdPaketler As New SqlDataAdapter("SELECT ID, PaketAdi, MesajAtabilir, TelefonGorebilir, EMailGorebilir FROM UyelikPaketleri WHERE (ID = " & dr("PaketID") & ") ORDER BY SK DESC", objSqlConnection) cmdPaketler.Fill(dtPaketler)
If (dtPaketler.Rows(0)("MesajAtabilir")) Then pnlFormForm.Visible = True pnlParaliUyelik.Visible = False Exit For Else pnlParaliUyelik.Visible = True pnlFormForm.Visible = False End If Next Else pnlParaliUyelik.Visible = True pnlFormForm.Visible = False End If
If ((IsNothing(objSqlTransaction)) OrElse (IsNothing(objSqlTransaction.Connection))) Then objSqlTransaction = objSqlConnection.BeginTransaction(IsolationLevel.ReadCommitted) End If
Mesaj.aspx.vb de bu kısımdan değişebilir miyim?
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.
Talep mesajı yollamak ücretsiz normal mesaj yollamayı da ücretsize nasıl çeviririm.
https://yadi.sk/i/1jqWiWdJmBCDL
Mesaj.aspx.vb de bu kısımdan değişebilir miyim?
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.