Finns det poster?

<%
If RS.EOF Then
 ' do this and that
else
  Do until RS.EOF
  RS.MoveNext
  loop
End If
%>

------------------
Mvh
Patrik aka Brimba
<A HREF="http://www.brimba.nu/default.asp?oPID=poll&PollID=20" TARGET=_blank>Har du husdjur hemma?
</A>Varför får man inte dricka saltvatten?

Riktigt så enkelt är det inte.
Jag vet att min databas är helt tom, alltså inte en enda post skapad, men jag vill köra ett script som talar om det för mig.
Detta låter kanske konstigt men jag har precis skapat tabellen i en sql-server på mitt webbhotell och vill veta om den blev riktigt skapad.

Är det förstått?

 sql = "select table_name from information_schema.tables where table_schema = current_user"
set rs = connect.execute(sql)
while not rs.eof
  response.write rs(0) & "<br>"
wend

På så sätt får du ut en lista på alla tabeller som du har skapat.

------------------
essentitia preter non sans multiplicandum

Vilka av namnen lär jag byta ut, samtliga?
Min databas heter scriptdatabas och tabellen heter script och en av kolumnerna heter rubrik, hur skulle strängen se ut då?

Är det några fler namn som jag lär ta reda på?

Det beror på vad du vill veta.

För att kontrollera om en tabellen SCRIPT finns:

sql = "select table_name from information_schema.tables where table_schema = current_user and table_name = 'SCRIPT'"
set rs = connect.execute(sql)
if rs.eof then
response.write Tabellen script är ej definierad <br>"
else
response.write Tabellen script är definierad <br>"
end if

För att ta reda på vilka kolumner som finns i en tabell

sql = "select * from information_schema.columns where table_schema = current_user and table_name = 'SCRIPT'"
set rs = connect.execute(sql)
if rs.eof then
   response.write "Det finns ingen tabell som heter script <br>"
else
  response.write "Kolumner i script"
  while not rs.eof
     response.write rs("column_name") & <br>"
     rs.movenext
  wend
end if

Visa datatyp för en viss kolumn i en tabell

sql = "select * from information_schema.columns where table_schema = current_user and table_name = 'SCRIPT' and column_name = 'RUBRIK'"
set rs = connect.execute(sql)
if rs.eof then
   response.write "Det finns ingen tabell som heter script <br>"
else
  response.write "Datatyp: " & rs("data_type") & "<br>"
end if

------------------
essentitia preter non sans multiplicandum

Tack!
Sidan säger "The page cannot be displayed" men jag ska prova lite mer, nu vet jag i alla fall hur jag ska göra.