%@LANGUAGE="VBSCRIPT"%>
<%
Dim rsCoramKontakt__MMColParam
rsCoramKontakt__MMColParam = "56"
If (Request.QueryString("HerstellerID") <> "") Then
rsCoramKontakt__MMColParam = Request.QueryString("HerstellerID")
End If
%>
<%
Dim rsCoramKontakt
Dim rsCoramKontakt_numRows
Set rsCoramKontakt = Server.CreateObject("ADODB.Recordset")
rsCoramKontakt.ActiveConnection = MM_conn_messe_STRING
rsCoramKontakt.Source = "SELECT * FROM Hersteller WHERE HerstellerID = '" + Replace(rsCoramKontakt__MMColParam, "'", "''") + "' ORDER BY Hersteller"
rsCoramKontakt.CursorType = 0
rsCoramKontakt.CursorLocation = 2
rsCoramKontakt.LockType = 1
rsCoramKontakt.Open()
rsCoramKontakt_numRows = 0
%>
Die Virtuelle Messe - Komfortable Produkte für Alt und Jung > Aussteller > Coram proMed > Kontaktinformationen
| Sie befinden sich hier: Startseite
> Aussteller > Coram
proMed > Kontaktinformationen |
<%
heute = now()
response.write day(heute) & "." & month(heute) & "." & year(heute)
%>
|
© GGT - Deutsche Gesellschaft für Gerontotechnik®
1997 - 2002
<%
rsCoramKontakt.Close()
Set rsCoramKontakt = Nothing
%>