%
dim conn,rst,querystr,a,b,c,d
set conn=Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath ("/deneme/db/v_t/z_t/_xz/_rsq/test.mdb")
querystr = "SELECT * FROM haber order by id desc "
set rst = conn.execute(querystr)
redim e(10)
redim d(10)
redim b(10)
redim c(10)
redim idm(10)
i=10
do while (not rst.eof)
idm(i)=rst.fields("id")
b(i)=rst.fields("manset")
if len(b(i)) > 252 then b(i)=mid(b(i),1,252)
c(i)=rst.fields("img")
d(i)=rst.fields("tik")
e(i)=rst.fields("baslik") & " " & rst.fields("date")
i=i-1
if i<0 then i=0
rst.movenext
loop
%>
| 
|
|
|
|
|
|
Pazartesi |
Salı |
Çarşamba |
Perşembe |
Cuma |
Cumartesi |
Pazar |
|
|
|
|
1 |
2 |
3 |
|
|
|
|
ASLI |
DUYGU |
DUYGU |
4 |
5 |
6 |
7 |
8 |
9 |
10 |
LALE |
HAYAT |
NUR |
ŞİFA |
SUBAŞI |
AKIN |
AKIN |
11 |
12 |
13 |
14 |
15 |
16 |
17 |
FİNİKE |
EKİN |
ASLI |
DEMET |
HAYAT |
LALE |
LALE |
18 |
19 |
20 |
21 |
22 |
23 |
24 |
AKIN |
NUR |
ŞİFA |
SUBAŞI |
FİNİKE |
DEMET |
DEMET |
25 |
26 |
27 |
28 |
29 |
30 |
31 |
HAYAT |
DUYGU |
EKİN |
LALE |
AKIN |
ASLI |
ASLI |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
ŞUBAT - 2010
Pazartesi |
Salı |
Çarşamba |
Perşembe |
Cuma |
Cumartesi |
Pazar |
1 |
2 |
3 |
4 |
5 |
6 |
7 |
NUR |
ŞİFA |
SUBAŞI |
FİNİKE |
DEMET |
EKİN |
EKİN |
8 |
9 |
10 |
11 |
12 |
13 |
14 |
ASLI |
DUYGU |
LALE |
HAYAT |
AKIN |
FİNİKE |
FİNİKE |
15 |
16 |
17 |
18 |
19 |
20 |
21 |
EKİN |
NUR |
ŞİFA |
DEMET |
ASLI |
SUBAŞI |
SUBAŞI |
22 |
23 |
24 |
25 |
26 |
27 |
28 |
DUYGU |
LALE |
HAYAT |
AKIN |
FİNİKE |
ŞİFA |
ŞİFA |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
| |
|
|
|
|
|
|
| |
|
|
|
|
|
|
MART - 2010
Pazartesi |
Salı |
Çarşamba |
Perşembe |
Cuma |
Cumartesi |
Pazar |
1 |
2 |
3 |
4 |
5 |
6 |
7 |
SUBAŞI |
EKİN |
DEMET |
ASLI |
NUR |
HAYAT |
HAYAT |
8 |
9 |
10 |
11 |
12 |
13 |
14 |
ŞİFA |
DUYGU |
LALE |
HAYAT |
AKIN |
NUR |
NUR |
15 |
16 |
17 |
18 |
19 |
20 |
21 |
FİNİKE |
SUBAŞI |
EKİN |
DEMET |
ASLI |
DUYGU |
DUYGU |
22 |
23 |
24 |
25 |
26 |
27 |
28 |
NUR |
ŞİFA |
HAYAT |
LALE |
FİNİKE |
AKIN |
AKIN |
29 |
30 |
31 |
|
|
|
|
SUBAŞI |
EKİN |
DEMET |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
| ECZANE ADI |
TELEFON NUMARASI |
ADRESİ |
AKIN ECZANESİ
|
0 242 855 20 00 |
Atatürk Cad. No:49 |
| BAŞAK ECZANESİ |
0 242 855 57 30 |
Kale Mah. Eski Gümrük Cad. No:40-B
|
| DEMET ECZANESİ |
0 242 855 36 06 |
Yeni Mah. |
| DUYGU ECZANESİ |
0 242 855 41 86 |
Kızılca Mah. Hastane Yanı
|
| EKİN ECZANESİ |
0 242 855 25 93 |
Cumhuriyet Cad. No:69 |
| FİNİKE ECZANESİ |
0 242 855 65 17 |
Eski Mah. Hastane Cad. |
| HAYAT ECZANESİ |
0 242 855 10 49 |
Eski Mah. Şok Market yanı No:31 |
| LALE ECZANESİ |
0 242 855 15 47 |
Hastane Cad. No:50 |
| NUR ECZANESİ |
0 242 855 14 54 |
Hastane Cad. No:39 |
| SUBASI ECZANESİ |
0 242 855 14 68 |
Atatürk Cad. No:41 |
| ŞİFA ECZANESİ |
0 242 855 50 63 |
Atatürk Cad. No:17 |
| |
|
|
| |
|
|
| |
|
|
|
|