T-SQL de random kayit çekmek çok basit (mis), biara böyle birsey ariyordum ve Sem Göksu arkadasim sagolsun meseleyi halletmemde yardimci oldu..

select top 10 from tabloadi order by newID()

Dinamik olarak "Yükleniyor" resimleri olusturabileceginiz bir site. Siteye buradan erisebilirsiniz.

Html kisminda istenilen ASP.NET kontrolüne <%=Lblmesaj.ClientID %> ile rahatça erisim saylayabiliyoruz. asagidaki örnekte olayi daha iyi kavrayacaginizi umuyorum.

<script type="text/javascript" language="javascript">

function islem()

var dl=document.getElementById('<%=DlListe.ClientID %>');

var value = dl.options[dl.selectedIndex].value;

if(value=='0')

document.getElementById('<%=Lblmesaj.ClientID %>').style.display="block";

document.getElementById('<%=Lblmesaj.ClientID %>').style.display="none";

</script>

<asp:DropDownList ID="DlListe" runat="server" onchange="javascript:islem()">

<asp:ListItem>0</asp:ListItem>

<asp:ListItem>1</asp:ListItem>

</asp:DropDownList>

<asp:Label ID="Lblmesaj" runat="server" Text="Merhaba"></asp:Label>

Asagidaki kod, functiona gönderilen string içerisine (bkz: deneme) seklinde girilen metni (bkz: <a href="sozluk.aspx?t=deneme">deneme</a> ) sekline çeviriyor.

Public Shared Function bkz(ByVal metin As String) As String
        Dim strContent As String = metin
        Dim urlregex As System.Text.RegularExpressions.Regex = New System.Text.RegularExpressions.Regex("\(bkz:\s*(.+?)\)", RegexOptions.IgnoreCase Or RegexOptions.CultureInvariant Or RegexOptions.IgnorePatternWhitespace Or RegexOptions.Compiled)
        metin = urlregex.Replace(metin, "(bkz: <a href=""sozluk.aspx?t=$1"">$1</a> )")
        Return metin
    End Function

        Dim mail As MailMessage = New MailMessage()
        mail.From = New MailAddress("info@deneme.net", "açiklama", System.Text.Encoding.UTF8)
        mail.Subject = "Subject metni"
        mail.To.Add(email)
        mail.Body = "gönderilmek istenen metin."
        mail.IsBodyHtml = True    'false yaparsaniz mail html formatinda olmaz.
        mail.BodyEncoding = Encoding.GetEncoding("ISO-8859-9") 'body nin dil standardi
        mail.SubjectEncoding = Encoding.GetEncoding("ISO-8859-9") ' Subject in dil standardi
        Dim client As SmtpClient = New SmtpClient("MailServer adresi")
        client.Credentials = New System.Net.NetworkCredential("kullanici adi", "sifre")
        client.Send(mail)