Danmarks største oversigt over webbutikker med alt til børnene

børnetøj - babytøj - babysko - legetøj - babyudstyr - babypleje - barnevogne
 Produkter:      
Forside
Tilmeld butik
Tilbudsavisen
Om smarteunger.dk
Forside > Information > Kontakt
 
  Kontakt
   
 
  Lane Hjelme Katharina Schlein
   
 

smarteunger.dk er udviklet og ejes af Katharina Schlein og Lane Hjelme.

Vi er ingeniører, småbørns mødre, IT-entusiaster og aktive Internet brugere.

Der er nok af spændende ting man kan bruge døgnets timer til, derfor er mange også bevidste om, hvad de vælger at bruge deres tid på.

Og indkøb af børnetøj tager faktisk tid hvis man gerne vil have et stort udvalg og har bestemte krav til kvaliteten. Det må gerne være både smart og slidstærkt. Og måske unikt.

Vi har begge benyttet os af gode postordre og Internet butikker, fordi man så kan handle når det passer ind i familiens program.

Men det har været svært at finde butikker der sælger deres varer på Internettet. Ofte er hjemmesiderne blot reklame for den fysiske butik.

Vi håber derfor, at denne guide vil være en hjælp for mange andre forældre, der ligesom os har mod til at handle på Internettet.

Hvis du har spørgsmål til de enkelte varer, så skal du rette henvendelse direkte til den butik der sælger varen. Du finder kontakt oplysninger på butikkens egen hjemmeside.

Kontakt:

Vi træffes på telefon 20210051 - fra kl. 15 - 20

Eller send os en mail, så kontakter vi dig som regel samme dag.

redaktion@smarteunger.dk

 
cvr 30699327 - smarteunger.dk - Eng Allé 15- 6710 Esbjerg V - kontakt - sitemap
<% ' ' find antal online butikker ' -------------------------- StrSort="forretning_navn ASC" strQuery="SELECT * FROM tblForretning_link where godkendt ORDER BY " &StrSort strProvider = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath( "\" ) & "\..\database\butikker_web.mdb" Set rst = Server.CreateObject("ADODB.recordset") rst.Open strQuery, strProvider dim j, nbutik, nannon j = 0 nbutik = 0 rst.movefirst while not rst.EOF nbutik = nbutik + 1 rst.MoveNext wend rst.Close set rst = Nothing ' ' find antal annoncer i tilbudsavisen ' ----------------------------------- StrSort="tid ASC" strQuery="SELECT * FROM annonce WHERE aktiv ORDER BY " &StrSort strProvider = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath( "\" ) & "\..\database\tilbudsavisen.mdb" Set rst = Server.CreateObject("ADODB.recordset") rst.Open strQuery, strProvider j=0 nannon = 0 rst.movefirst while not rst.EOF nannon = nannon + 1 rst.MoveNext wend rst.Close set rst = Nothing ' ' skab forbindelse til NetSundhedsplejerske.dk ' -------------------------------------------- extURL = "http://www.netsundhedsplejerske.dk/specialfeeds/smarteunger.xml" set xmlDoc = createObject("Msxml.DOMDocument") xmlDoc.async = false xmlDoc.setProperty "ServerHTTPRequest", true xmlDoc.load(extURL) dim title(5), link(5), i , stat stat = true if (xmlDoc.parseError.errorCode <> 0) then stat = false else Set oNode = xmldoc.documentElement.getElementsByTagName("item") i = 0 For each Item in oNode i = 1 + i title(i) = Item.ChildNodes.Item(0).text link(i) = Item.ChildNodes.Item(2).text Next end if %>