I sydöstra Sverige finner du det vackra landskapet Blekinge, Sveriges Trädgård. Där finns ön Sturkö.   Nedan ser du en satellitbild över sydöstra Sverige där ön Sturkö är utmärkt	Karlskrona har en  vacker skärgård med många öar. Cirka tre mil utanför Karlskrona ligger ön Sturkö.  Sturkö betyder den stora ön, och det är också den största av Karlskronas skärgårdsöar. Hit sökte och söker sig många dels på grund av fisket, dels på grund av den ostördhet som ön kan erbjuda. Sturkö har en betydande fiskeflotta hemmahörande i Ekenabbens fiskehamn. Sturkö hade också en betydande stenindustri, och antalet bofasta ökade under dess höjdpunkt till 4000. Idag bor cirka 1300 bofasta på ön. Sturkö fick förbindelse med fastlandet så sent som 1939. Läs mera om Sturkö!
Läs om ortnamnen på Sturkö
Här finner du 2 vackra bilder på vår sommarstuga om du klickar    på stuga   Här finner du lite länkar om Sturkö, mera kommer när jag hittar flera intressanta!   Fotoalbum!! Klicka här för att se lite bilder från Sturkö's sydsida! Fotoalbum!! Klicka här för att se mera bilder! Fotoalbum med vintriga bilder !! Klicka här för att se! T
En stämningsfull bild som visar hur kusten kan se ut

Uppdaterad 5/12 2000

Lars Fredriksson

(Ännu ett extra fotoalbum inlagt nu )

<% Function googleColor(value, random) Dim colorArray colorArray = Split(value, ",") googleColor = colorArray(random Mod (UBound(colorArray) + 1)) End Function Function googleScreenRes() Dim screenRes, delimiter, resArray screenRes = Request.ServerVariables("HTTP_UA_PIXELS") delimiter = "x" If IsEmpty(screenRes) Then screenRes = Request.ServerVariables("HTTP_X_UP_DEVCAP_SCREENPIXELS") delimiter = "," End If resArray = Split(screenRes, delimiter, 2) If (UBound(resArray) + 1) = 2 Then googleScreenRes = "&u_w=" & resArray(0) & "&u_h=" & resArray(1) End If End Function Function googleDcmguid() Dim dcmguid dcmguid = Request.ServerVariables("HTTP_X_DCMGUID") If Not IsEmpty(dcmguid) Then googleDcmguid = "&dcmguid=" & dcmguid End If End Function Dim googleTime, googleDt, googleScheme, googleHost googleTime = DateDiff("s", "01/01/1970 00:00:00", Now()) googleDt = (1000 * googleTime) + Round(1000 * (Timer - Int(Timer))) googleScheme = "http://" If StrComp(Request.ServerVariables("HTTPS"), "on") = 0 Then googleScheme = "https://" googleHost = Server.URLEncode(googleScheme & Request.ServerVariables("HTTP_HOST")) Dim googleAdUrl, googleAdOutput googleAdUrl = "http://pagead2.googlesyndication.com/pagead/ads?" &_ "ad_type=text_image" &_ "&channel=" &_ "&client=ca-mb-pub-0228538744072206" &_ "&dt=" & googleDt &_ "&format=mobile_single" &_ "&host=" & googleHost &_ "&ip=" & Server.URLEncode(Request.ServerVariables("REMOTE_ADDR")) &_ "&markup=chtml" &_ "&oe=utf8" &_ "&output=chtml" &_ "&ref=" & Server.URLEncode(Request.ServerVariables("HTTP_REFERER")) &_ "&url=" & googleHost & Server.URLEncode(Request.ServerVariables("URL")) &_ "&useragent=" & Server.URLEncode(Request.ServerVariables("HTTP_USER_AGENT")) &_ googleScreenRes() &_ googleDcmguid() Set googleAdOutput = Server.CreateObject("MSXML2.ServerXMLHTTP") googleAdOutput.Open "GET", googleAdUrl, false googleAdOutput.Send Response.Write(googleAdOutput.responseText) %>