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

- ASP/ASP.NET (https://www.ircforumlari.net/asp-aspnet/)

- - Asp Nedir? (https://www.ircforumlari.net/asp-aspnet/20358-asp-nedir.html)

Asp Microsoft tarafından geliştirilmiş bir script dilidir. Asıl adı Active Server Pages (Etkin Sunucu Sayfaları)'dir. Asp çağımızda gittikçe yaygınlaşan bir dildir, bunun en büyük nedeni kolay yönetilebilir olması, veritabanı bağlantıları ile birçok form işini kolaylaştırma gibi özelliklere sahip tabii bunlara birçoğunu ekleyebiliriz. Asp dosyalarını çalıştırmak için bir browserdan başka asp teknolojisini tanıyan bir server (sunucu) lazım. HTML dosyalarında dosyanın üzerine iki defa tıkladığımızda tarayımız açılıyordu kodları yorumlayıp sayfayı gösteriyordu, ama asp dosyalarında yani uzantısı .asp olan dosyaların eğer üzerine iki defa tıklarsanız ya sadece kodlar görünecek ya da tarayınız bu dosyayı download etmeye çalışacaktır. Çünkü sadece browser asp kodlarını yorumlayamaz ve az önce söylediğim şeylerden biri olur. İşte bunlarla karşılaşmamak için bir web sunucu kurmanız gerekir tabii bu dili Microsoft geliştirdiği için Microsoft'un bir web sunucusunu kurmanız lazım.Eskiden asp sadece Microsoft tabanlı sunucularda çalıştırılabiliyordu ama şu an Unix tabanlı işletim sistemlerinde de çalıştırılabiliyor. Eğer Windows 95/98 kullanıyorsanız PWS ( Personal Web Server - Kişisel Web Sunucu ) veya Windows 2000/Nt kullanıyorsanız IIS( Internet Information Services - Internet Hizmetleri Yöneticisi ) kullanmanız gerekir. PWS Windows 98 Cd'si ile birlikte geliyor ve CD'nin Add-on klasöründe bulunuyor. IIS ise Windows'a sonradan ekleniyor. Windows 2000 Professional da kurulmamış, Server da ise kurulmuş olarak geliyor. Gerçi Windows 2000 de de Denetim Masası*Program Ekle/Kaldır*Windows Bileşenleri Ekle/Kaldır'dan ekliyorsunuz. Asp CGI/Perl'e karşı geliştirildiği düşünülmektedir çünkü Asp'den önce veri işleri, form doldurma, email yollama gibi işler için CGI kullanılıyordu ama CGI bazı yerlerde yetersiz kalıyordu özellikle veritabanı işlemlerinde ASP ise bu işi kolaylaştırarak bize sunuyor. Asp'nin şu an 3.0 versiyonu mevcut ve eminim ki Microsoft 3.5 gibi sürüm üzerinde çalışıyorlardır. Asp sunucu taraflı bir dildir.Peki bu nedemek? Sunucu taraflı demek kodların sunucuda yorumlarınıp sonuçların istemciye gönderilmesi demek.Yani şöyle açıklayim siz bir istemci olarak asp sayfaları kullanan bir siteye gittiğinizde tarayıcınız sunucudan adresini yazdığını dosyayı ister.Sunucu bakar eğer Asp dosyası ise önce kodları yorumlar bunu Asp.dll dosyasını kullanarak yapar ve eğer hata yoksa bildiğimiz HTML halinde sonuçlar çıkar bunlarıda tarayıcınıza yollar tarayıcınızda o kodları yorumlayıp sonuçları size gösterir.Bir sitede eğer bir asp dosyasını görüntülüyor olsanız bile kaynaklarında tek kelime bile asp kodu yoktur bunun nedeni az önce an yazdığımız server taraflı olmasıdır.

Yanıt: Asp Nedir?

Asp ' de Üyelik Sistemi :


<HTML>
<HEAD>
<TITLE>Hata!</TITLE>
<LINK HREF=css/css.css REL=stylesheet TYPE=text/css>
<meta http-equiv=refresh content="2; URL=javascript:history.go(-1)">
</HEAD>
<BODY>
 
Hata : E-Mail Bölümünü Eksik! E-Mail Adresinizi Doldurmadan Üye Olamazsiniz...
<center>Simdi Geldiginiz Sayfaya Yönlendiriliyorsunuz!</center>
<center><a href="javascript:history.go(-1)">Eger Uzun Bir Süre Burada Kalirsaniz Tiklayin...</a></center>
</body>
</html>

Hata Tipi:
Active Server Sayfaları, ASP 0126 (0x80004005)
'dahili.asp' içerik dosyası bulunmadı.
/yesilaski/uyelik/hata/hataad.asp, line 1

dahili.asp :

<%
Vt_Yolu=Server.MapPath("db/uyelik.mdb" )
Cumle= "DBQ=" & Vt_Yolu &";Driver={Microsoft Access Driver (*.mdb)}"
%>

Yanıt: Asp Nedir?

MYSQL Üye+date :

<%
cinsiyet = request("cinsiyet" )
sehir = request("sehir" )
yas = request("yas" )
yas1 = request("yas1" )
sayfa = CInt(Request.QueryString("sayfa" ))
%>

<%
tarih1 = DateAdd("n" , -10, Now())
%>

<%
Dim Rs2, kayitsayisi, MySQL
mySQL="Select COUNT(*) FROM tbl WHERE cinsiyet='" & cinsiyet &"' AND tarih >= '" & tarih1 &"'"
Set Rs2 =baglan.Execute(mySQL)
kayitsayisi=Rs2(0)
toplam = kayitsayisi
%>
<table border="0" width="598" id="table6" height="103" cellspacing="0" cellpadding="0" bordercolor="#000000">
<%
sayfasay = Int(toplam)
if sayfa = "" or not IsNumeric(sayfa) or sayfa = 0 then
sayfa = Int(1)
Else
sayfa = CInt(sayfa)
end If
verisayisi = Int(5)
baslangic = sayfa*verisayisi
baslangic = baslangic-verisayisi
sayfalar = Int(sayfasay/verisayisi)+1
set rs=baglan.Execute("select*from tbl WHERE cinsiyet='" & cinsiyet &"' and tarih >= '" & tarih1 &"' limit " & baslangic & ", " & verisayisi & ";" )
If RS.Bof And RS.Eof Then
Response.write("kayıt yok" )
Else
Do Until Rs.Eof
%>
<tr>
<td width="9" rowspan="4" height="93" bgcolor="#F8F8F8">

</td>
<td width="298" height="19" colspan="2" bgcolor="#F8F8F8">


 <%=rs("kulad" ) %></td>
<td width="183" valign="middle" height="19" bgcolor="#F8F8F8"> </td>
<td width="25" valign="middle" align="center" height="19" bgcolor="#F8F8F8">
</td>
<td width="77" valign="middle" align="left" height="19" bgcolor="#F8F8F8">
</td>
<td width="6" align="left" height="98" bgcolor="#F3F7F8" rowspan="4">
</td>
</tr>
<tr>
<td width="104" rowspan="3" height="74" bgcolor="#FFE0C1">

<img border="0" src="uye_resim/a.gif" width="88" height="71"></td>
<td width="194" height="26" bgcolor="#FFE0C1">

 <%=rs("yas" ) %> Yaşında
, <%=rs("cinsiyet" ) %> 
<%=rs("sehir" ) %> ' de Yaşıyor..</td>
<td width="183" valign="middle" height="26" bgcolor="#FFE0C1">
 <%=rs("tarih" ) %>// 
<%=tarih1 %></td>
<td width="25" align="center" height="26" bgcolor="#FFE0C1">
♥</td>
<td width="77" align="left" height="26" bgcolor="#FFE0C1">

<a href="mesaj_gonder.asp?uye=<%=rs("kulad" ) %>">

Mesaj Gonder</a></td>
</tr>
<tr>
<td width="194" valign="middle" height="46" rowspan="2" bgcolor="#FFE0C1">

177 cm, 69 kg, Oğlak, 
Elâ gözlü,
Siyah saçlı</td>
<td width="183" valign="middle" rowspan="2" height="53" bgcolor="#FFE0C1">
 <%=Left(rs("hakk" ),100) %>...</td>
<td width="25" align="center" height="26" bgcolor="#FFE0C1">
☺</td>
<td width="77" align="left" height="26" bgcolor="#FFE0C1">


<a href="profil_detay.asp?uye_no=<%=rs("Id" ) %>">

Detaylı Profil</a></td>
</tr>
<tr>
<td width="25" height="27" bgcolor="#FFE0C1">

₪</td>
<td width="77" height="27" align="left" bgcolor="#FFE0C1">

<a href="ark_kaydet.asp?id=<%=rs("Id" ) %>&isim=<%=rs("kulad" ) %>">

Listeme Ekle</a></td>
</tr>
<tr>
<td width="598" colspan="7" height="5" bgcolor="#F3F7F8">
 </td>
</tr>
<%
rs.Movenext
Loop %>
<%End If %>
</table>
<table border="0" width="100%" id="table7">
<tr>
<td>


<%
If CInt(sayfa) = 1 Then
Response.Write " "
Else
a = CInt(sayfa) -1
Response.Write "<a href=uye_list.asp?yas=" &yas&"&yas1=" &yas1&"&cinsiyet=" &cinsiyet&"&sehir=" &sehir&"&sayfa=" & a & qstring &"><< Önceki </a> "
End If
If CInt(sayfa) + 6 > CInt(sayfalar) Then
b = CInt(sayfalar)
Else
b = CInt(sayfa) + 6
End If
If CInt(sayfa) =< 6 Then
c = 1
Else
c = CInt(sayfa) - 6
End If
For j = c To b
If j = CInt(sayfa) Then
Response.Write "" & j & " "
Else
Response.Write "<a href=uye_list.asp?yas=" &yas&"&yas1=" &yas1&"&cinsiyet=" &cinsiyet&"&sehir=" &sehir&"&sayfa=" & j & qstring &">" & j & "</a> "
End If
Next
If CInt(sayfa) => CInt(sayfalar) Then
Response.Write " "
Else
a = CInt(sayfa) + 1
Response.Write "<a href=uye_list.asp?yas=" &yas&"&yas1=" &yas1&"&cinsiyet=" &cinsiyet&"&sehir=" &sehir&"&sayfa=" & a & qstring &"> Sonraki >></a> "
End If

%>

Yanıt: Asp Nedir?

Üye 15 dakika sonra offline olsun

<%
Set istatistik4 = server.createobject("adodb.recordset" )
SQL="Select * from uyeler where online = 'evet' order by id desc"
istatistik4.Open SQL,baglantim,1,3

If istatistik4.Eof Then
Response.Write "Şu anda online üye yok!!!"
Else
Do While not istatistik4.Eof
Response.Write "<a href=javascript:YeniPencere('uye_profil.asp?uye_id =" &istatistik4("id" )&"','200','150','650','167')>" &istatistik4("kadi" )&"</a>, "
istatistik4.Movenext
Loop
End If
%>

Çıkış.ASP :

----
<%
uye_online.update
uye_online("online" ) = "hayir"
uye_online.update

Session ("kadi" ) = ""
Session ("sifre" ) = ""
Session ("uye_seviyesi" ) = ""
Session ("online" ) = "cikti"

Response.Cookies ("kadi" ) = ""
Response.Cookies ("sifre" ) = ""
Response.Cookies ("uye_seviyesi" ) = ""

Response.Redirect "default.asp"
%>

Yanıt: Asp Nedir?

Yeni Başlayanlar İçin Hazır Site

Dwnload :
http://www.maxiasp.com/sc_yorum.asp?scno=853

Yanıt: Asp Nedir?

Bana asp'yi öğretebilecek olan vaarmı?

Yanıt: Asp Nedir?

asp ogrenmeyin bosuna asp'ye harciyacaginiz zamani php ye harcayin daha modern teknik ve kolay. ASP ile 50 satir ile yapmaya calistiginiz olayi PHP ile 20 satirla yaparsiniz modify olmasi cok kolay, her gun gelisiyor.

Yanıt: Asp Nedir?

Zor olan şeyle belkide çok büyük işler başarabilrisin Newyork.