% If session("yetki")<>"" Then %> <% dim kod kod=request.QueryString("id") kod=cint(kod) Set Baglanti=Server.CreateObject("Adodb.Connection") Baglanti.Open Cumle Set Rs=Server.CreateObject("Adodb.Recordset") Sorgu="Select * from soy where kod=" & kod Rs.Open Sorgu, Baglanti, 1, 1 %>
|
<%= Rs("ad")%> <%= Rs("soyad") %> <% if isnull(rs("mail"))=true or rs("mail")="" then Response.Write("") Response.Write("mail@altiok.net") else Response.Write("") Response.Write( rs("mail")) end if %> |
|||||||||||||||||||||||||
| <% if rs("sayfa")<>"" then %> <% else Response.Write(rs("aciklama")) end if %> |
|
||||||||||||||||||||||||