<%@LANGUAGE="VBSCRIPT" CODEPAGE="1253"%> Ελληνικά νησιά - Πολυτελή ξενοδοχεία
 Ποιοι είμαστε     Επικοινωνία     Διαφημιστείτε
Αναζήτηση:  
<% Euro=date EuroDate =day(Euro) & "/" & month(Euro) & "/" & year(Euro) response.write EuroDate %>
<% Response.write FormatDateTime(now(),4) %>
c
 
Χάρτης
Ταυτότητα
Ιστορία
Αξίζει να δείτε
Ενδιαφέροντα
Παραλίες
Φωτογραφίες
Συγκοινωνίες
Διαμονή
Εστιατόρια
Καφέ-Ποτό
Καταστήματα
Υπηρεσίες
 
Άλλα νησιά
Links
   
   
   
   
Ελληνικά νησιά - Άλλοι προορισμοί

Πολυτελής βίλα στη Μύκονο

Βίλα στη Μύκονο

Πληροφορίες στη σελίδα Mykonos Villa




Σουίτες στην μαγευτική Σαντορίνη

Santorini hotel

Πληροφορίες στη σελίδα Accommodation - Santorini hotel




Παραδοσιακό ξενοδοχείο στην Ιθάκη

Βίλα στη Μύκονο

Πληροφορίες στη σελίδα Ithaka hotel




Ξενοδοχείο πολυτελείας στην Κέρκυρα

Corfu hotel

Πληροφορίες στη σελίδα Corfu hotel




Ταξίδι στα ελληνικά νησιά. Φιλοξενούμενες ιστοσελίδες φίλων των Μικρών Κυκλάδων.
Το SmallCyclades.com εγγυάται για τις υψηλές προδιαγραφές των παραπάνω καταλυμάτων.


<% myDSN="DRIVER={MySQL ODBC 3.51 Driver}; SERVER=smallcycl.ipowermysql.com; DATABASE=ferrari_default; UID=ferrari;PASSWORD=!antihack!; OPTION=3" set myconnection=server.createobject("adodb.connection") myconnection.open myDSN set ets3=server.CreateObject("adodb.recordset") rowcount2=0 sql="SELECT * FROM `dreambanner` order by priority" ets3.open sql,myconnection do while not ets3.eof if ets3.fields("typer") = "jpg" then response.write " & ets3.fields(" response.write "
" response.write "
" end if if ets3.fields("typer") = "gif" then response.write " & ets3.fields(" response.write "
" response.write "
" end if if ets3.fields("typer") = "swf" then response.write"" response.write"" response.write"" response.write" " response.write"" response.write "
" response.write "
" end if ets3.movenext loop %>

 





<% set ets8=server.CreateObject("adodb.recordset") sql8="SELECT * FROM `commentsen`" ets8.open sql8,myconnection if ets8.fields("photo")="no" then response.Write("no photo available") else response.write "
" response.write "
" & ets8.fields("desgr") & "

" end if %>

 

<% ets3.close myconnection.close set ets3 = Nothing set myconnection = Nothing %>