Sitio web de vídeo bajo demanda basado en tecnología ASP + WebPlayer
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
cn.open "provider=microsoft.jet.oledb.4.0;data source="&server.mappath("shipin.mdb")
set rs=server.createobject("adodb .recordset")
sql="select * from shipin order by xh desc"
rs.open sql,cn,1,1
si no rs eof entonces
mientras no rs.eof%>
& lt;p> Nombre: <%=rs(1)%> Introducción: <%=rs(4)%>
|
<%rs.movvenext
wend
finalizar si
rs.close
establecer rs=nada
cn.close
establecer cn=nada%