Gönderen Konu: Üyeye Özel Menü Yapmak  (Okunma sayısı 5232 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı burajan

  • Web Programcısı
  • Administrator
  • *
  • İleti: 5109
  • Puan: 334
  • Cinsiyet: Bay
  • Web Programcısı
    • Burak ŞİMŞEK - Kişisel İnternet Sitesi
Üyeye Özel Menü Yapmak
« : Temmuz 31, 2007, 12:03:43 ÖS »
Burada yazacağım işlemler ile sitenize güzel bir üyeye özel menü oluşturabilirsiniz. Uzun zaman önce yapmıştım bunu. İstek gelince yayınlayayım, arkadaşlarımız yararlansın dedim  ;D

fp_custom.asp dosyasını açıp aşağıdaki kodları ekleyin:
Kod: [Seç]
<% function uyemenu()
if not strDBNTUserName = "" then
spThemeTitle= "Size Özel"
    spThemeBlock1_open(intSkin) %>
    <table width="100%" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td align="left" valign="middle">
<center><b><%=strDBNTUserName%></b><br><%
'Get member info
strSql = "SELECT " & strMemberTablePrefix & "MEMBERS.M_NAME, "
strSql = strSql & strMemberTablePrefix & "MEMBERS.M_TITLE, "
strSql = strSql & strMemberTablePrefix & "MEMBERS.MEMBER_ID, " & strMemberTablePrefix & "MEMBERS.M_LEVEL, "
strSql = strSql & strMemberTablePrefix & "MEMBERS.M_POSTS, "
strSql = strSql & strMemberTablePrefix & "MEMBERS.M_GOLD, "
strSql = strSql & strMemberTablePrefix & "MEMBERS.M_REP, "
strSql = strSql & strMemberTablePrefix & "MEMBERS.M_RTOTAL, "
strSql = strSql & strMemberTablePrefix & "MEMBERS.M_PAGE_VIEWS, "
strSql = strSql & strMemberTablePrefix & "MEMBERS.M_PMSTATUS, "
strSql = strSql & strMemberTablePrefix & "MEMBERS.M_AVATAR_URL "
strSql = strSql & " FROM " & strMemberTablePrefix & "MEMBERS"
strSql = strSql & " WHERE " & strMemberTablePrefix & "MEMBERS.MEMBER_ID = " & strUserMemberID
set rsMem = my_Conn.Execute (strSql)
flag_PMstatus = rsMem("M_PMSTATUS")
' - Get Avatar Settings from DB
strSql = "SELECT " & strTablePrefix & "AVATAR2.A_WSIZE"
strSql = strSql & ", " & strTablePrefix & "AVATAR2.A_HSIZE"
strSql = strSql & ", " & strTablePrefix & "AVATAR2.A_BORDER"
strSql = strSql & " FROM " & strTablePrefix & "AVATAR2"
set rsav = my_Conn.Execute (strSql) %>
        <img src="<%= rsMem("M_AVATAR_URL") %>" align="absmiddle" width=<%= rsav("A_WSIZE") %> height=<%= rsav("A_HSIZE") %> border=<%= rsav("A_BORDER") %> hspace="0" />
        <%
        set rsav = nothing
        response.Write("<hr>")
 %></center>
<div class="menu">
<% if intMyMax or intIsSuperAdmin then %>
<a href="javascript:;" onclick="mymax();" class="nav_menuItem">- Sayfa Düzeni<br></a>
<% end if %>
<a href="cp_main.asp" class="nav_menuItem">- Kontrol Paneli<br></a>
<a href="cp_main.asp?cmd=5" class="nav_menuItem">- Kişisel Ayarlar<br></a>
<a href="cp_main.asp" class="nav_menuItem">- Profilimi İncele<br></a>
<a href="cp_main.asp?cmd=9" class="nav_menuItem">- Profilimi Düzenle<br></a>
<a href="cp_main.asp?cmd=1" class="nav_menuItem">- Avatar Düzenle<br></a>
<a href="members.asp" class="nav_menuItem">- Üye Listesi<br></a>
<a href="statistics.asp" class="nav_menuItem">- Site İstatistikleri<br /></a>
<% if hasAccess(1) then %>
<a href="site_monitor.asp" class="nav_menuItem" target="_search">- Site Monitörü<br></a>
<% end if %>
</div>
<hr>
<div class="menu">
<% if chkApp("forums","USERS") then %>
<a href="forum_active_topics.asp">- <%= txtActvTopics %>&nbsp;<%= cntActiveTopics() %><br /></a>
<% End If %>
<a href="active_users.asp" class="nav_menuItem">- Aktif Kullanıcılar<br></a>
<% if chkApp("PM","USERS") then %>
<a href="pm.asp" class="nav_menuItem">- Özel Mesaj<br></a>
<% end if %>
<% if intBookmarks then %>
<a href="cp_main.asp?cmd=7" class="nav_menuItem">- Takip Ettiklerim<br></a>
<% end if
  if intSubscriptions then %>
<a href="cp_main.asp?cmd=6" class="nav_menuItem">- Aboneliklerim<br></a>
<% end if %>
<a href="cp_main.asp?cmd=4" class="nav_menuItem">- Yanıtladığım Konular<br></a>
<% if hasAccess(1) and chkApp("forums","USERS") then %>
<a href="forum_report_post_moderate.asp" class="nav_menuItem">- Raporlar<br></a>
<% end if
  if hasAccess(1) then %>
<a href="admin_home.asp" class="nav_menuItem">- Yönetici Paneli<br></a>
<% end if %>
</div>
        </td>
      </tr>
    </table>
<% spThemeBlock1_close(intSkin)
end if
end function
%>

Bu dosyayı kaydedip, sitenizdeki ile değiştirin.
Daha sonra sitenizin yönetim paneline girerek yeni bir blok ekleme sayfasına gelin ve şu aşağıdaki bilgileri sırasıyla girin:
Blok adı: Üye Menüsü
Fonksiyon: uyemenu()
Blok açıklaması: Üyeye Özel Menüyü Gösterir
Aktif: Evet
Sütun Yeri: Her iki yana


Daha sonra bunu yönetim panelinizden ana sayfa düzeni için aktif edin.
Not: Skyportalın kendisinde ziyaretçiler için giriş bloğu bulunduğundan dolayı bunu tekrar yapmaya gerek duymadım. O blok sadece ziyaretçilere çıkıyordu. Bu blokta sadece üyelere çıkıyor. Örnek resmini ekten görebilirsiniz. Güle güle kullanın.
Konuyu Paylaş:
  delicious  facebook  twitter  google
Kişisel İnternet Sitem => buraksimsek.com.tr - http://www.buraksimsek.com.tr

Lütfen özel mesaj ile destek istemeyiniz. Önce forumda arama yapınız daha sonra forumda ilgili bölüme konu açınız.

Çevrimdışı skyquakes

  • İleti: 143
  • Puan: 52
  • Cinsiyet: Bay
  • la uhibbul afilin...
    • Miskin Kedi
-Üyeye Özel Menü Yapmak
« Yanıtla #1 : Temmuz 31, 2007, 19:54:17 ÖS »
güzel işler çıkarıyorsun yine :"3
her şey bir tutam mavi uğrunaydı;
   biraz gökyüzünden,
            biraz denizden,
                biraz da kalbimizden...
bir tutam mavi içindi her şey...

Çevrimdışı burajan

  • Web Programcısı
  • Administrator
  • *
  • İleti: 5109
  • Puan: 334
  • Cinsiyet: Bay
  • Web Programcısı
    • Burak ŞİMŞEK - Kişisel İnternet Sitesi
-Üyeye Özel Menü Yapmak
« Yanıtla #2 : Ağustos 01, 2007, 06:48:33 ÖÖ »
güzel işler çıkarıyorsun yine :"3
;) Eyvallah, elimden geldikçe
Kişisel İnternet Sitem => buraksimsek.com.tr - http://www.buraksimsek.com.tr

Lütfen özel mesaj ile destek istemeyiniz. Önce forumda arama yapınız daha sonra forumda ilgili bölüme konu açınız.

Çevrimdışı burajan

  • Web Programcısı
  • Administrator
  • *
  • İleti: 5109
  • Puan: 334
  • Cinsiyet: Bay
  • Web Programcısı
    • Burak ŞİMŞEK - Kişisel İnternet Sitesi
-Üyeye Özel Menü Yapmak
« Yanıtla #3 : Temmuz 02, 2008, 15:33:56 ÖS »
Arkadaşlar, bu yukarıda anlattığım menüyü modül haline getirmiştim. Ve bugünde yeni bir sürümünü yayınladım. Bu sürümle birlikte menü modülünün kurulması daha kolay hale getirildi.
Skyportal Üye Menüsü Modülü v1.1 İndirmek İçin Tıklayın
Kişisel İnternet Sitem => buraksimsek.com.tr - http://www.buraksimsek.com.tr

Lütfen özel mesaj ile destek istemeyiniz. Önce forumda arama yapınız daha sonra forumda ilgili bölüme konu açınız.

 

Benzer Konular

  Konu / Başlatan Yanıt Son İleti
7 Yanıt
1974 Gösterim
Son İleti Ağustos 09, 2007, 19:35:29 ÖS
Gönderen: berat9544
2 Yanıt
941 Gösterim
Son İleti Mayıs 19, 2007, 13:05:43 ÖS
Gönderen: prog_cenk
1 Yanıt
4748 Gösterim
Son İleti Temmuz 09, 2007, 17:00:17 ÖS
Gönderen: prog_cenk
11 Yanıt
3771 Gösterim
Son İleti Kasım 17, 2008, 19:29:36 ÖS
Gönderen: jarni
3 Yanıt
505 Gösterim
Son İleti Şubat 21, 2011, 20:15:58 ÖS
Gönderen: AdmiN