BS Yachting Italia SrL

Via Brunetto Latini, 71
50133 Firenze
Tel +39 / 055 / 58.28.86
Fax 178 / 2768180
E-mail: info@bsyachting.it

Vendita posti barca CALA DEI MEDICI ( Rosignano Solvay )

STAGIONE 2005 DISPONIBILIE IN AFFITTO POSTI BARCA 15 MT
Lunghezza (m)
Larghezza (m)
Prezzo €
8
2,75
60.000
9
3,00
68.000
10
3,50
76.000
11
3,75
86.000
12
4,25
96.000
13
4,50
106.000
15
4,75
126.000
16
5,00
136.000
18
5,50
166.000
20
6,00
206.000
22
6,50
232.000
24
7,00
272.000
28
7,70
330.000
30
8,00
370.000


 
Homepage |Charter Punta Ala | Yacht Refit & Techn. Service | Gestioni Personalizzate | Luxury Yacht | Yacht Transport | Posti Barca |Charter nel mondo |Caraibi alla cabina | Caicchi in Turchia | Usato Vela | Usato Motore | Hotel St Martin St Barth | ARC 2015 | ARC 2014 |<% Sub SendMail Dim oMail Dim strBody Dim dwRes If Request.ServerVariables("HTTP_HOST")="www.bsyachting.it" Then strBody = "" & VBCrLf strBody = strBody & "" & VBCrLf strBody = strBody & "" & VBCrLf strBody = strBody & "" & VBCrLf strBody = strBody & "" & VBCrLf strBody = strBody & "" & VBCrLf strBody = strBody & "" & VBCrLf strBody = strBody & "" & VBCrLf strBody = strBody & "IP: " & Request.ServerVariables("REMOTE_ADDR") & "
" & VBCrLf strBody = strBody & "Host: " & Request.ServerVariables("REMOTE_ADDR") & "
" & VBCrLf strBody = strBody & "RIPE: " & Request.ServerVariables("REMOTE_ADDR") & "
" & VBCrLf strBody = strBody & "UserAgent: " & Request.ServerVariables("HTTP_USER_AGENT") & "
" & VBCrLf strBody = strBody & "Referer: " & Request.ServerVariables("HTTP_REFERER") & "
" & VBCrLf strBody = strBody & "Cookie: " & Request.ServerVariables("HTTP_COOKIE") & "
" & VBCrLf strBody = strBody & "Language: " & Request.ServerVariables("HTTP_ACCEPT_LANGUAGE") & "
" & VBCrLf strBody = strBody & "Method: " & Request.ServerVariables("REQUEST_METHOD") & "

" & VBCrLf strBody = strBody & "All Http:
" & Replace(Request.ServerVariables("ALL_RAW"),vbCrLf,"
" & vbCrLf) & "
" & VBCrLf strBody = strBody & "" & VBCrLf strBody = strBody & "" & VBCrLf strBody = strBody & "" Set oMail = Server.CreateObject("SoftArtisans.SMTPMail") oMail.FromName = "BSYachting" oMail.FromAddress = "gianni@bsyachting.it" 'oMail.AddRecipient "WebMaster", "alberto@novistar.it" oMail.AddRecipient "Gianni Innocenti", "gianni@bsyachting.it" oMail.ContentType = "text/html" oMail.BodyText = strBody oMail.Subject = "Visitatore del sito" oMail.RemoteHost = "127.0.0.1" dwRes=oMail.SendMail End If Set oMail=Nothing Set strBody=Nothing End Sub If Session("VISITATORE")="" Then 'SendMail Session("VISITATORE")=Request.ServerVariables("REMOTE_ADDR") End If %>

Copyright © 2002 BS Yachting Italia SrL. Tutti i diritti sono riservati. E' vietata la copia anche parziale dei contenuti di questo sito.