%@LANGUAGE="VBSCRIPT"%> <% Dim anz_datei Dim anz_datei_numRows Set anz_datei = Server.CreateObject("ADODB.Recordset") anz_datei.ActiveConnection = MM_sql_server_edata_STRING anz_datei.Source = "SELECT * FROM dbo.red_anz_datei" anz_datei.CursorType = 0 anz_datei.CursorLocation = 2 anz_datei.LockType = 1 anz_datei.Open() anz_datei_numRows = 0 %> <% Dim anz_firma Dim anz_firma_numRows Set anz_firma = Server.CreateObject("ADODB.Recordset") anz_firma.ActiveConnection = MM_sql_server_edata_STRING anz_firma.Source = "SELECT * FROM dbo.red_anzahl_firma" anz_firma.CursorType = 0 anz_firma.CursorLocation = 2 anz_firma.LockType = 1 anz_firma.Open() anz_firma_numRows = 0 %>
|
|||||||||||
|
|||||||||||
|
|||||||||||
© electronic-data
2005 | Impressum |
|||||||||||