Asp | Mysql ile 300 bin veri olan sitem çok yavaş çalışıyor

dün gece basit bir procedure yazdım, halletim sanırım, şimdi denemeler yapacağım, teşekkür ederim.

Artık kafayı yiyeceğim, beynim çatladı şu işin içinden çıkamadım, 1.numaralı sitenin anasayfasında yer alan sorgu hızlı çalışıyor , fakat 2.numaralı sorgu olan sayfalama yaptığım sayfa 20-25 saniyeden önce gelmiyor, 2.sorgudaki mantık şu ; örneğin istanbul şehri linkine tıklıyor ve istanbul'un id'sine eşit tüm firmalar sayfalanmış şekilde listeleniyor.

Bilgisi olan arkadaşların yardımına ihtiyacım var, lütfen cevaplarınızı bekliyorum.

1.NOLU SORGU
<%set firma=baglanti.execute("SELECT FIR.id,FIR.resim,FIR.firmaadi,FIR.tel,FIR.website, SEH.id SEHIRID,SEH.sehiradi SEHIRADI,ILC.id ILCEID,ILC.ilceadi ILCEADI,SEK.id SEKTORID,SEK.sektoradi SEKTORADI,ASEK.id ALTSEKTORID,ASEK.sektoradi ALTSEKTORADI FROM firmalar FIR LEFT JOIN sehirler SEH ON FIR.sehir_id = SEH.id LEFT JOIN ilceler ILC ON FIR.ilce_id = ILC.id LEFT JOIN sektorler SEK ON FIR.sektor_id = SEK.id LEFT JOIN altsektorler ASEK ON FIR.sektoralt_id = ASEK.id ORDER BY FIR.id DESC LIMIT 10")
s=1
do while not firma.eof
firmaid=firma("id")
firmaresim=firma("resim")
firmaadi=firma("firmaadi")
firmaadicevir=cevir(firma("firmaadi"))
sehiradi=firma("SEHIRADI")
sehiradicevir=cevir(firma("SEHIRADI"))
ilceadi=firma("ILCEADI")
ilceadicevir=cevir(firma("ILCEADI"))
website=firma("website")
sektoradi=firma("SEKTORADI")
sektoradicevir=cevir(firma("SEKTORADI"))
altsektoradi=firma("ALTSEKTORADI")
altsektoradicevir=cevir(firma("ALTSEKTORADI"))%>
<div id="Firma"<%if s=1 then%> style="padding-top:0px; border:0px;"<%end if%>>
<div id="Firma_Resim"><a href="/firma/<%=firmaid%>/<%=firmaadicevir%>" title="<%=firmaadi%>"><%if firmaresim="" then%><img src="/images/firmaresmiyok.jpg" alt="<%=firmaadi%>"/><%else%><img src="/upload/<%=firmaresim%>" alt="<%=firmaadi%>"/><%end if%></a></div>
<div id="Firma_Adi"><a href="/firma/<%=firmaid%>/<%=firmaadicevir%>" title="<%=firmaadi%>"><%=firmaadi%></a></div>
<div id="Firma_Adres"><a href="/sehir/<%=firma("SEHIRID")%>/<%=sehiradicevir%>" title="<%=sehiradi%>"><%=sehiradi%></a> / <a href="/ilce/<%=firma("ILCEID")%>/<%=ilceadicevir%>" title="<%=ilceadi%>"><%=ilceadi%></a></div>
<div id="Firma_Telefon"><%=firma("tel")%><%if not website="" then%> - <a href="http://<%=httpsil(website)%>" target="_blank"><%=websitetemizle(website)%></a><%end if%></div>
<div id="Firma_Sektor"><a href="/sektor/<%=firma("SEKTORID")%>/<%=sektoradicevir%>" title="<%=sektoradi%>"><%=sektoradi%></a>
/ <a href="/altsektor/<%=firma("ALTSEKTORID")%>/<%=altsektoradicevir%>" title="<%=altsektoradi%>"><%=altsektoradi%></a></div>
</div>
<%s=s+1
firma.movenext:loop
firma.close : set firma=nothing%>




-------------------------

2.NOLU SORGU;
<%
url=request.ServerVariables("QUERY_STRING")
varmi=instr(url,"=")
if varmi>0 then
linkim=split(url,"=")
sayife=linkim(1)
else
linkim=1
end if
%>

<% KayitSayisi = 26

If sayife <> "" Then
'Bulundugumuz sayfayi bu degiskenin degeri olarak atayalim
Sayfa =sayife
Else
'Degilse baslangiç sayfa numaramizi 1 olarak atayalim
Sayfa = 1
End If


'Kayit sayimiz ve sayfa numaramiza göre veritabanindan verilerimizi talep ediyoruz
Set firma = Baglanti.Execute("SELECT FIR.id,FIR.resim,FIR.firmaadi,FIR.tel,FIR.website, SEH.id SEHIRID,SEH.sehiradi SEHIRADI,ILC.id ILCEID,ILC.ilceadi ILCEADI,SEK.id SEKTORID,SEK.sektoradi SEKTORADI,ASEK.id ALTSEKTORID,ASEK.sektoradi ALTSEKTORADI FROM firmalar FIR LEFT JOIN sehirler SEH ON FIR.sehir_id = SEH.id LEFT JOIN ilceler ILC ON FIR.ilce_id = ILC.id LEFT JOIN sektorler SEK ON FIR.sektor_id = SEK.id LEFT JOIN altsektorler ASEK ON FIR.sektoralt_id = ASEK.id where FIR.sehir_id='"&yaz("id")&"' ORDER BY FIR.ustdecikar DESC LIMIT " & (KayitSayisi*Sayfa)-(KayitSayisi) & "," & KayitSayisi)

'Veritabaninda kriterlerimize uygun kayitlarin toplam sayisini aliyoruz
'Bu sayfa numaralarini dogru yazdirabilmemiz için sart
Set SQLTop = Baglanti.Execute("SELECT COUNT(id) FROM firma where sehir_id='"&yaz("id")&"'")
TopKayit = SQLTop(0)

'Eger veritabanimizdan kayit dönüyorsa
'If Not firma.EOF Then

'HTML tablomuzu olusturuyoruz.
%>

<%s=1
do while not firma.eof
firmaid=firma("id")
firmaresim=firma("resim")
firmaadi=firma("firmaadi")
firmaadicevir=cevir(firma("firmaadi"))
sehiradi=firma("SEHIRADI")
sehiradicevir=cevir(firma("SEHIRADI"))
ilceadi=firma("ILCEADI")
ilceadicevir=cevir(firma("ILCEADI"))
website=firma("website")
sektoradi=firma("SEKTORADI")
sektoradicevir=cevir(firma("SEKTORADI"))
altsektoradi=firma("ALTSEKTORADI")
altsektoradicevir=cevir(firma("ALTSEKTORADI"))%>

<div id="FirmaIcerik" style="<%if s=1 or s=2 then%>padding-top:0px; border:0px;<%end if%><%if s=1 or s=3 or s=5 or s=7 or s=9 or s=11 or s=13 or s=15 or s=17 or s=19 or s=21 or s=23 or s=25 or s=27 or s=29 or s=31 or s=33 or s=35 or s=37 or s=39 or s=41 or s=43 or s=45 or s=47 or s=49 or s=51 or s=53 or s=55 or s=57 then%> margin-left:0px;<%end if%>">
<div id="FirmaIcerik_Resim"><a href="/firma/<%=firmaid%>/<%=firmaadicevir%>" title="<%=firmaadi%>"><%if firmaresim="" then%><img src="/images/firmaresmiyok.jpg" alt="<%=firmaadi%>"/><%else%><img src="/upload/<%=firmaresim%>" alt="<%=firmaadi%>"/><%end if%></a></div>
<div id="FirmaIcerik_Adi"><a href="/firma/<%=firmaid%>/<%=firmaadicevir%>" title="<%=firmaadi%>"><%=firmaadi%></a></div>
<div id="FirmaIcerik_Adres"><a href="/sehir/<%=firma("SEHIRID")%>/<%=sehiradicevir%>" title="<%=sehiradi%>"><%=sehiradi%></a> / <a href="/ilce/<%=firma("ILCEID")%>/<%=ilceadicevir%>" title="<%=ilceadi%>"><%=ilceadi%></a></div>
<div id="FirmaIcerik_Telefon"><%=firma("tel")%><%if not website="" then%> - <a href="http://<%=httpsil(website)%>" target="_blank"><%=websitetemizle(website)%></a><%end if%></div>
<div id="FirmaIcerik_Sektor"><a href="/sektor/<%=firma("SEKTORID")%>/<%=sektoradicevir%>" title="<%=sektoradi%>"><%=sektoradi%></a>
/ <a href="/altsektor/<%=firma("ALTSEKTORID")%>/<%=altsektoradicevir%>" title="<%=altsektoradi%>"><%=altsektoradi%></a></div>
</div>

<%s=s+1
firma.movenext:loop%>

<div id="Temizle"></div>
<%
'Toplam kayit sayisi gösterilecek kayit sayisindan büyükse...
If Clng(TopKayit) > Clng(KayitSayisi) Then
'Link verilecek kaç sayfamiz oldugunu hesapliyoruz
SayfaSayisi = Clng(TopKayit) / Clng(KayitSayisi)
If InStr(1,SayfaSayisi,",",1) > 0 Then SayfaSayisi = Clng(Left(SayfaSayisi,InStr(1,SayfaSayisi,",",1))) + 1

'Ve yine elimizdeki sayfa sayisi 1´den büyükse
If SayfaSayisi > 1 Then
response.Write "<ul class=""sayfalama"">"
'Her sayfa numarasi için sayfamiza linkimizi yazdiriyoruz
if sayife>1 then Response.Write "<li><a href=""/sehir/" & yaz("id") & "/" & cevir(yaz("sehiradi")) & "/?sayfaa=" & sayife - 1& """> Önceki </a></li>"

if Clng(SayfaSayisi)-Clng(sayife) =1 then
artacaksayfa = "1"
elseif Clng(SayfaSayisi)-Clng(sayife) =2 then
artacaksayfa = "2"
elseif Clng(SayfaSayisi)-Clng(sayife) =3 then
artacaksayfa = "3"
elseif Clng(SayfaSayisi)-Clng(sayife) =4 then
artacaksayfa = "4"
elseif Clng(SayfaSayisi)-Clng(sayife) =5 then
artacaksayfa = "5"
elseif Clng(SayfaSayisi)-Clng(sayife) > 5 then
artacaksayfa = "5"
else
artacaksayfa = 0
end if

if sayife=0 or sayife=1 or sayife=2 or sayife=3 or sayife=4 or sayife=5 then
baslangic=1
bitis=10
else
baslangic=sayife-5
bitis=Clng(sayife)+Clng(artacaksayfa)
end if
if SayfaSayisi<10 then bitis=SayfaSayisi end if
For i=baslangic To bitis
if Clng(sayife)=Clng(i) then
Response.Write "<li><a href=""/sehir/" & yaz("id") & "/" & cevir(yaz("sehiradi")) & "/?sayfa=" & i & """ class=""secili"">" & i & "</a></li>"
else
Response.Write "<li><a href=""/sehir/" & yaz("id") & "/" & cevir(yaz("sehiradi")) & "/?sayfa=" & i & """>" & i & "</a></li>"
end if
Next
if Clng(Sayfa) < (SayfaSayisi) then Response.Write "<li><a href=""/sehir/" & yaz("id") & "/" & cevir(yaz("sehiradi")) & "/?sayfa=" & Sayfa+1 & """> Sonraki </a></li>" end if
response.Write "</ul>"
End If

'Sayfa numarasi yazdirma islemi bitti...
End If

firma.close : set firma=nothing
%>

asp ise neden mssql değil ki ?

hocam hep mysql kullandığım için bu projedede mysql kullandım, delirtecek noktaya getirdi şu olay beni, mssql'de hız ne kadar farkederki