<%@LANGUAGE="VBSCRIPT" CODEPAGE="28597"%> <% Dim RS__MMColParam RS__MMColParam = "1" If (Request.QueryString("News") <> "") Then RS__MMColParam = Request.QueryString("News") End If %> <% Dim RS Dim RS_numRows Set RS = Server.CreateObject("ADODB.Recordset") RS.ActiveConnection = MM_news_STRING RS.Source = "SELECT * FROM news WHERE News = " + Replace(RS__MMColParam, "'", "''") + "" RS.CursorType = 0 RS.CursorLocation = 2 RS.LockType = 1 RS.Open() RS_numRows = 0 %> ΧΑΜΠΑΚΗΣ - HABAKIS, Ηλεκτρονικές Κλειδαριές, Minibar, Ηλεκτρονικά Χρηματοκιβώτια, Εξοικονομητές Ενέργειας, Είδη Κιγκαλερίας, Πλαστικές Κάρτες, Electronic Locks, Electronic Safes, Energy Management, Hardware, Plastic Cards
Καλώςορίσατε στα νέα της εταιρίας μας! Μέσα από αυτή την σελίδα μπορείτε να ενημερωθείτε για τις τελευταίες εξελίξεις που αφορούν την εταιρία ΧΑΜΠΑΚΗΣ

 

 

 

<%=(RS.Fields.Item("DATING").Value)%>
<%=(RS.Fields.Item("DESCRIPTION_GR").Value)%> <%=(RS.Fields.Item("PHOTO_LG").Value)%>

 

 
  Recommended resolution 1024 X 768 - copyright © 2006 - All rights reserved - Website design by Cosmart -
<% RS.Close() Set RS = Nothing %>