Sanırım şöyle birşey istiyorsun.
' BURADAN İTİBAREN DÖNGÜ BAŞLAMALI
bolum2 = strBody
bolum2 = bolum2 & "<table width=""860"" border=""1"" cellpadding=""0"" cellspacing=""0"">" & vbcrlf _
& "<tr>" & vbcrlf _
& "<th scope=""col"">" & vbcrlf _
& objrs("kod_no") & vbcrlf _
& "</th>" & vbcrlf _
& "<th scope=""col"">" & vbcrlf _
& objrs("kod_no") & vbcrlf _
& "</th>" & vbcrlf _
& "<th scope=""col"">" & vbcrlf _
& objrs("kod_no") & vbcrlf _
& "</th>" & vbcrlf _
& "<th scope=""col"">" & vbcrlf _
& objrs("kod_no") & vbcrlf _
& "</th>" & vbcrlf _
& "<th scope=""col"">" & vbcrlf _
& objrs("kod_no") & vbcrlf _
& "</th>" & vbcrlf _
& "<th scope=""col"">" & vbcrlf _
& objrs("kod_no") & vbcrlf _
& "</th>" & vbcrlf _
& "<th scope=""col"">" & vbcrlf _
& objrs("kod_no") & vbcrlf _
& "</th>" & vbcrlf _
bolum2 = ""
' DÖNGÜ BURADA BİTMELİ
öncelikle cevap için teşekkürler.
bu kısımda döngü olsun istiyorum. Kayıt sayısı kadar bu kısmı tekrar etsin. Yani bir liste haline getirsin.