<% set db=server.createobject("ADODB.Connection") set rst=Server.createobject("ADODB.Recordset") sql_von=month(date)&"."&day(date)&"."&year(date) sql_bis=month(date)&"."&day(date)&"."&year(date) db.open "Driver={SQL Server};Server=mssql2012.db4.domainxyz.de,10433;Database=mssql1801064;Uid=erichsen2;Pwd=MoFe0902;" 'db.open "Driver={SQL Server};Server=mssql2000.db1.domainxyz.de;Database=mssql1801064;Uid=erichsen2;Pwd=MoFe0902;" rst.open "select * from news where HP='2' and von<='"&sql_von&"' and bis>='"&sql_bis&"' order by von desc",db if rst.eof=false then%>

Aktuelles

NEU <%=rst("HEADLINE")%>

<%=left(rst("INHALTE"),120)%>... mehr

<%rst.movenext if rst.eof=false then%>

<%=rst("HEADLINE")%>

<%=left(rst("INHALTE"),120)%>... mehr

<% end if end if rst.close db.close%>