asp kod yazdım hata veriyor yardım Lütfen...

[yasko_]

<%
set conn = Server.CreateObject("ADODB.Connection")
conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("tomruk/siparis.mdb"))
set ysk = server.createobject("adodb.recordset")
%> 
 <%
	sql = "select * from siparis id"
	ysk.Open sql, conn, 1, 3 
	%>
  <%Do while not ysk.eof%>
<table width="600" border="3" align="center" cellpadding="0" cellspacing="0" bordercolor="#0000FF" bgcolor="#00FF00">
  <tr>
    <td align="center" valign="bottom">ad</td>
    <td align="center" valign="bottom">soyad</td>
    <td align="center" valign="bottom">email</td>
    <td align="center" valign="bottom">telefon</td>
    <td align="center" valign="bottom">gsm</td>
    <td align="center" valign="bottom">siparis</td>
  </tr>
  <tr>
    <td align="center" valign="bottom"><%=ysk("ad")%></td>
    <td align="center" valign="bottom"><%=ysk("soyad")%></td>
    <td align="center" valign="bottom"><%=ysk("email")%></td>
    <td align="center" valign="bottom"><%=ysk("telefon")%></td>
    <td align="center" valign="bottom"><%=ysk("gsm")%></td>
    <td align="center" valign="bottom"><%=ysk("siparis")%></td>
  </tr>
</table>

yukarıdaki kodu kullanıyorum... veritabanındaki bilgileri tablolar haliinde sayfada gözükmesi için ama aşağıdaki hatayı alıyorum yardımcı olabilecek olan arkadaşlar varsa sevinirim...

Microsoft VBScript compilation  error '800a03fb'

Expected 'Loop'

/tomruk/Yonetici/tablo.asp, line 26

 

[desingby]

kardeşim bak yukarda doo kullanöışsın loop yok do kapatmak için hata bundan dolayı

 

[yasko_]

tam anlayamadım biraz daha açarmısınız..