Avatar billede brianalbertsen Nybegynder
15. februar 2005 - 20:21 Der er 23 kommentarer og
1 løsning

shop modul.

Hejsa. jeg skal bruge et lille shopmodul til min side.

Der må gerne være et admin modul men ikke et must.

Der skal være menuer som jeg selv kan oprette og lægge varer ind i. Varen skal vises med et billede en pris og så en tekst om varen.

Shoppen må ikke være for stor da den skal åbnes i en underside på min side. Der skal ikke være mulighed for at betale med dk kort eller andre slags. Den skal bare smide varerne ned i en indkøbskurv som man kan kalde frem. I den skal den regne prisen sammen for de forskellige varer.
Når man trykker køb skal den sende en mail til mig og ham. den til mig skal der stå hvad personen har bestilt og den til ham skal bare være en kvittering på hvad der er bestilt.

Jeg har kigget på en masse gratis webshops. men enten er de for svære og sætte op, ellers er de for store eller har for mange funktioner.

Skal egentlig kun bruge omkring 10 varer men vil gerne kunne oprette ca 20 da der måske kommer lidt flere.

Har kigget på: ashop, mcartfree, shop_easy1 og en del andre jeg ikke lige kan huske.

Jeg håber virkelig i kan hjælpe mig.
Avatar billede areon Nybegynder
16. februar 2005 - 08:36 #1
Hejsa Jeg kan godt kigge på din hjemmeside og webshop.

Jeg vil kunne implimentere en webshop med et brugerinterface hvor du selv kan indsætte nye produkter, beskrivelse og billeder.

Implimenteringen til dit eget design kan jeg dog ikke lave helt gratis så vil gerne lige høre fra dig på min email hvis det har din interesse. ts@net4you.bg

Min Webshop løsning er PHP.

Med venlig hilsen
Thomas
Avatar billede brianalbertsen Nybegynder
16. februar 2005 - 08:55 #2
Siden er gratis og da den ikke er til mig selv er det ikke op til mig at bestemme om der skal penge med i spillet. Indtil nu har svaret været negativt.

Min side understøtter heller ikke php, men kun asp.
Avatar billede areon Nybegynder
16. februar 2005 - 08:58 #3
ok. og også godt implimentere i asp, men dette ville blive dyre end min php løsning.. men du har min email så du kan jo kontakte mig hvis i søger assistance.

held og lykke
mvh
Thomas
Avatar billede cybermike Nybegynder
16. februar 2005 - 15:19 #4
Vi lander på omkring 6.000 for en ASP webshop løsning. Intresseret så kontakt mig på ekim@unifix.org, er du mere realistisk så kontakter du mig og så hooker vi dig op med et webhotel der understøtter PHP og så laver vi en PHP løsning for 4.000 kr.
Avatar billede cdc Novice
16. februar 2005 - 15:27 #5
http://www.eksperten.dk/spm/587092 har selv brugt den jeg viser til der inde

//cdc
Avatar billede brianalbertsen Nybegynder
17. februar 2005 - 09:02 #6
Ved ikke om i er mindre begavede eller hvad der sker når folk nævner ordet webshop.

Jeg skrev: Siden er gratis og da den ikke er til mig selv er det ikke op til mig at bestemme om der skal penge med i spillet. Indtil nu har svaret været negativt.


Hvad er ideén så med at give tilbud på nogle løsninger.

//cdc Jeg kigger lige på den når jeg kommer hjem. Hvis jeg går i stå kan du så hjælpe lidt med opsætning? Kan godt en del selv så håber jeg klarer det selv.
Avatar billede cdc Novice
17. februar 2005 - 09:18 #7
du tager bare kontakt hvis det er, denne er meget nem at få til at virke ;o)

/cdc
Avatar billede olebole Juniormester
18. februar 2005 - 17:04 #8
<ole>

Du kommer selv frem til to muligheder:
1. At brugerne på Eksperten er ubegavede
2. At der sker noget, du ikke magter at gennemskue, når man nævner ordet webshop

Hvis et site indeholder en webshop, hvor varerne ikke er gratis, er der vel ikke tale om et gratis site(?)
Hvis varerne ikke er gratis, er der vel ikke tale om en webshop(?)

Umiddelbart hælder jeg nok mest til din mulighed #2  ;o)

/mvh
</bole>
Avatar billede olebole Juniormester
19. februar 2005 - 02:42 #9
Et indlæg  i min 'karma' tigger ligefrem om en uddybning:

"Blander sig i spørgsmål og prøver at få en diskusion i gang. Det skal lige siges personen slet ikek havde været aktiv i tråden før han kom med et surt opstød. Ærgeligt at eksperten.dk er hærget af disse typer. Nok derfor mange af de gamle er msuttet deres vej. /brianalbertsen"

1. Nej, jeg blander mig ikke i dit spørgsmål for at få en diskusion igang. Det var i al beskedenhed et forfængeligt forsøg på at få dig til at tænke dig en lille smule om.

2. Hvis ikke det første indlæg må være kritisk, hvornår er det så iorden at stille sig kritisk? Du modsiger dig selv i dine indlæg og undrer dig derefter på mest arrogante vis over, om de brugere, der reflekterer på din bøn om hjælp, er ubegavede.
Det burde ikke kunne undre, din uforskammede og nedladende tone overfor for brugere, der forsøger at hjælpe, munder ud i en reaktion.

3. Det kan du naturligvis ikke vide, men mange af 'de gamle' taler fatiksk en hel del sammen udenfor dette forum og i den forbindelse må jeg skuffe dig. Du overvurderer i høj grad min rolle i forbindelse med, at gamle brugere vælger at vende E ryggen.
Den måde, hvorpå du tiltaler folk, der tilbyder at hjælpe dig, er netop noget af det, mange af os gamle finder brækværdigt - og noget af det, vi finder mest negativt ved Eksperten.

Så ved du lidt mere om, hvordan 'de gamle' tænker og hvorfor vi engang imellem får lyst til at skride
Avatar billede brianalbertsen Nybegynder
21. februar 2005 - 17:30 #10
Du må da være helt ekset miin gode ven: Selvølgelig taler man sammen uden for eksperten. Jege r selv en af de gamle hvis du gider at få facts på plads.
Men gider ikke diskutere med dig herinde. Det er mit liv for kort til. Du må finde et andet sted af komme med dine meninger.
Avatar billede brianalbertsen Nybegynder
21. februar 2005 - 17:32 #11
/cdc Den er smuk den shop du linkede til. Jeg får dog en fejl når jeg er ved og bestille i den. Det er når jeg sender ordren. Ved ikke om du kan hjælpe mig ud af den knibe:


Ordre Status Server object error 'ASP 0177 : 800401f3'

Server.CreateObject Failed

/e-shop/order_send.asp, line 190

Invalid ProgID. For additional information specific to this message please visit the Microsoft Online Support site located at: http://www.microsoft.com/contentredirect.asp.
Avatar billede cdc Novice
21. februar 2005 - 17:42 #12
min linie er min Jmail, spørgsmålet her er hvad du kan bruge på din server, hvilke komponenetr der er til rådighed. Vælg så den du kan bruge

//cdc
Avatar billede cdc Novice
21. februar 2005 - 17:43 #13
i shoppen kan du vælge mellem CDONTS, JMail, ASPMail jeg har så valgt Jmail af gamel vane da jeg har mulighed for at bruge alle på mit hotel
Avatar billede brianalbertsen Nybegynder
21. februar 2005 - 18:02 #14
I hvilken fil vælger jeg det?
Avatar billede cdc Novice
21. februar 2005 - 18:04 #15
order_send.asp der er tre forslag som skrevet tidligere, brug den du kan/har på webhotel
Avatar billede cdc Novice
21. februar 2005 - 18:11 #16
i den fil du har downloadet helle shoppen ligger der tre dokumenter:
JMail-komponent.txt
ASPMail-komponent.txt
CDONTS-komponent.txt

denne skal smides ind i din order_send.asp mellem:

' ---------> DETTE ER MAIL KOMPONENTEN ('CDONTS', 'JMail', 'ASPMail').

og

' ---------> HER SLUTTER MAIL KOMPONENTEN.

Og du skal selvføgelig huske at udfylde de forskellige felte
Avatar billede brianalbertsen Nybegynder
21. februar 2005 - 18:12 #17
Mailer.SendMail
    Set Mailer = Jmail

Er det det der?
Avatar billede brianalbertsen Nybegynder
21. februar 2005 - 18:18 #18
gider du evt og sende order_send filen til mig? det er nemmere!
Avatar billede brianalbertsen Nybegynder
21. februar 2005 - 18:42 #19
du kan sende den på brian@trustnet.dk eller over msn på brianalbertsen@mail.dk
Avatar billede olebole Juniormester
21. februar 2005 - 19:23 #20
"Men gider ikke diskutere med dig herinde. Det er mit liv for kort til. Du må finde et andet sted af komme med dine meninger."

Tja ... så kunne det da være, du skulle overveje at undlade at indlede 'diskusioner'  :)
Det jo ikke mig, der begyndte en diskution. Jeg forsøgte blot at forklare dig, hvad det var i dit spørgsmål, folk misforstod ... det havde du tydeligt svært ved at fatte på egen hånd.

Derefter var det _dig_, der begyndte en diskusion ... eller rettere manglede modet til at tage diskusionen og derfor valgte at svine mig til i et forum, jeg ikke kan svare i.

Da jeg finder den fremgangsmåde temmelig fladpandet, skal du ikke forvente, jeg vælger samme ynkelige løsning - og finder andre steder at komme af med mine meninger.
Hvis der er noget, jeg finder det rigtigt at sige til folk, gør jeg det et sted, de har mulighed for at svare på tiltale ... og så er jeg sådan set ligeglad med, om det evt. virker angstprovokerende på dig og at du øjensynligt foretrækker at svine folk til uden mulighed for reaktion.

/EOD
Avatar billede cdc Novice
21. februar 2005 - 20:08 #21
Alt ordnes via eksperten så her er koden, dog er den lang. Gog skal du legge mærke til:

    ' -> DETTE ER MAIL SERVEREN, DER VIL SENDE E-MAIL'EN.
    JMail.ServerAddress = "smtp.ditdomain.dk"

og

    strRecipient_Email = "din@email.dk"

***************** koden er her under **********************

<!-- #include file="order_configuration.asp" -->
<%
    Dim Kategorier(100,4)

    Set db = Server.CreateObject("ADODB.Connection")
    Connect = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("e-shop.mdb")
    db.Open Connect

    SQL = "SELECT KategoriNavn, KategoriParent, KategoriID, KategoriRank FROM Kategorier ORDER BY KategoriRank"
    Set rs = db.Execute(SQL)
    While Not rs.EOF
    If i<100 Then
    Kategorier(i,0) = rs("KategoriNavn")
    Kategorier(i,1) = rs("KategoriParent")
    Kategorier(i,2) = rs("KategoriID")
    Kategorier(i,3) = rs("KategoriRank")
    End If
    i = i+1
    rs.MoveNext
    Wend
    arrayLength = i-1

    Function show_search(parent1, CategoryLayer)
    If parent1 <> vbNullString Then
    For t = 0 To arrayLength
    If Kategorier(t,1) = parent1 Then

    EmptySpace = ""
    For x = 0 To CategoryLayer
    EmptySpace = EmptySpace & ""
    Next

    ' -> VED AT ÆNDRE 'EmptySpace & ""' TIL 'EmptySpace & "&nbsp;"' LAVES EN INDRYKNING FOR HVER KATEGORI.

    If CategoryLayer = 0 Then
    AddOn = ""
    AddOn1 = ""
    End If
    Response.Write(EmptySpace & "<a href='order_product.asp?r="&Kategorier(t,2)&"'>" & AddOn & Kategorier(t,0) & AddOn1 & "</a><br clear='all'>" & vbCrLf)
    parent2 = Kategorier(t,2)
    CategoryLayer1 = CategoryLayer +1
    show_search parent2, CategoryLayer1
    End If
    Next
    End If
    End Function

    Function CheckField(input)
    If Len(input)<1 Then OK = 1
    CheckField = input
    End Function
%>
<%
Response.AddHeader "cache-control","private"
Response.AddHeader "pragma","no-cache"
Response.CacheControl = "no-cache"
Response.CacheControl = "private"
Response.Expires = -1
Response.ExpiresAbsolute = Now() -1
%><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
    <title>e-shop'en</title>

    <meta http-equiv="content-type" content="text/html; charset=iso-8859-1">
    <meta http-equiv="expires" content="-1">
    <meta http-equiv="pragma" content="no-cache">
    <meta name="author" content="e-shop'en">
    <meta name="description" content="e-shop'en">
    <meta name="keywords" content="e-shop'en">

    <link rel="stylesheet" type="text/css" href="e-shop.css">
    <meta http-equiv="expires" content="-1">
    <meta http-equiv="pragma" content="no-cache">
</head>

<body onLoad="if ('Navigator' == navigator.appName) document.forms[0].reset();">

<!-- TITEL START -->

<table align="center" border="0" cellpadding="0" cellspacing="0" width="600">
<tr>
<td align="left" valign="top" width="100%">

<h1>e - s h o p ' e n</h1>

</td>
</tr>
</table>

<!-- TITEL SLUT -->

<!-- TOM TABEL FOR AT GIVE MERE PLADS -->

<table align="center" border="0" cellpadding="0" cellspacing="0" width="600">
<tr>
<td align="center" valign="top" width="100%">
<p>&nbsp;</p>
</td>
</tr>
</table>

<!-- INDHOLD START -->

<table align="center" border="0" cellpadding="0" cellspacing="0" width="600">
<tr>
<td align="left" valign="top" width="140">

<h3>Ordre Status</h3>
</td>

<td align="left" valign="top" width="460">
<%
    OK = 0
    If OrderForm_Company    = true Then orderPerson = OrderPerson & OrderEmail_Company & ": " & CheckField(Request.Form("OrderForm_Company")) & vbCrLf
    If OrderForm_Name      = true Then orderPerson = OrderPerson & OrderEmail_Name & ": " & CheckField(Request.Form("OrderForm_Name")) & vbCrLf
    If OrderForm_Street    = true Then orderPerson = OrderPerson & OrderEmail_Street & ": " & CheckField(Request.Form("OrderForm_Street")) & vbCrLf
    If OrderForm_PostalCode = true Then orderPerson = OrderPerson & OrderEmail_PostalCode & ": " & CheckField(Request.Form("OrderForm_PostalCode")) & vbCrLf
    If OrderForm_City      = true Then orderPerson = OrderPerson & OrderEmail_City & ": " & CheckField(Request.Form("OrderForm_City")) & vbCrLf
    If OrderForm_Phone      = true Then orderPerson = OrderPerson & OrderEmail_Phone & ": " & CheckField(Request.Form("OrderForm_Phone")) & vbCrLf
    If OrderForm_Email      = true Then orderPerson = OrderPerson & OrderEmail_Email & ": " & CheckField(Request.Form("OrderForm_Email")) & vbCrLf & vbCrLf
    If OrderForm_Message    = true Then orderPerson = OrderPerson & OrderEmail_Message & ": " & CheckField(Request.Form("OrderForm_Message")) & vbCrLf

    If OK = 0 Then
    OnlineOrder = Session("OnlineOrder")
    If isArray(OnlineOrder) Then
    i = Session("Items")
    OrderMailText = OrderMailText & vbCrLf & vbCrLf
    OrderMailText = OrderMailText & orderPerson & vbCrLf
    OrderMailText = OrderMailText & "-------------------------------------------" & vbCrLf
    For t = o To i
    If (OnlineOrder(t,0)) <> "" Then
    AllTogether_PerProduct = + OnlineOrder(t,0) * OnlineOrder(t,2)
    AllTogether_AllProducts = formatNumber(AllTogether_AllProducts + AllTogether_PerProduct,2,,-2)
    OrderMailText = OrderMailText & ListProduct & ": " & OnlineOrder(t,4) & vbCrLf
    OrderMailText = OrderMailText & ListNumber & ": " & OnlineOrder(t,3) & vbCrLf
    OrderMailText = OrderMailText & ListQuantity & ": " & OnlineOrder(t,0) & vbCrLf
    OrderMailText = OrderMailText & ListPrice & ": " & ListCurrency & formatNumber(OnlineOrder(t,2),2,,-2) & vbCrLf
    OrderMailText = OrderMailText & ListTotal & ": " & ListCurrency & formatNumber(AllTogether_PerProduct,2,,-2) & vbCrLf
    OrderMailText = OrderMailText & "-------------------------------------------" & vbCrLf
    End If
    Next
    OrderMailText = OrderMailText & ListSubtotal & ": " & ListCurrency & formatNumber(AllTogether_AllProducts,2,,-2) & vbCrLf
    OrderMailText = OrderMailText & ListShipping & ": " & ListCurrency & ListShipping_Value & vbCrLf
    OrderMailText = OrderMailText & "-------------------------------------------" & vbCrLf
    OrderMailText = OrderMailText & ListSubTotalShipping & ": " & ListCurrency & formatNumber((AllTogether_AllProducts * ListZero_Value) + ListShipping_Value,2,,-2) & vbCrLf
    OrderMailText = OrderMailText & "-------------------------------------------" & vbCrLf
    OrderMailText = OrderMailText & ListTax & ": " & ListCurrency & formatNumber((AllTogether_AllProducts * ListTax_Value) + (ListShipping_Value * ListTax_Value),2,,-2) & vbCrLf
    OrderMailText = OrderMailText & "-------------------------------------------" & vbCrLf
    OrderMailText = OrderMailText & ListTotal_AllTogether & ": " & ListCurrency & formatNumber((AllTogether_AllProducts * ListTotal_AllTogether_Value) + (ListShipping_Value * ListTotal_AllTogether_Value),2,,-2) & vbCrLf
    OrderMailText = OrderMailText & "-------------------------------------------"

' ---------> DETTE ER MAIL KOMPONENTEN ('CDONTS', 'JMail', 'ASPMail').

    ' -> DENNE MAIL KOMPONENT ER 'JMail'.

    ' -> DETTE ER VARIABLERNE FRA FORMULAR FELTERNE.
    Dim strOrderForm_Name
    Dim strOrderForm_Email
    Dim strRecipient_Name
    Dim strRecipient_Email

    strOrderForm_Name = Request.Form("OrderForm_Name")
    strOrderForm_Email = Request.Form("OrderForm_Email")
    strRecipient_Name = "e-shop'en"
    strRecipient_Email = "din@email.dk"

    ' -> DETTE ÅBNER ET MAIL SERVER OBJEKT.
    Set JMail = Server.CreateObject("JMail.SMTPMail")

    ' -> DETTE ER MAIL SERVEREN, DER VIL SENDE E-MAIL'EN.
    JMail.ServerAddress = "smtp.ditdomain.dk"

    ' -> DETTE ER AFSENDERENS NAVN FRA FORMULAR FELTET.
    JMail.SenderName = strRecipient_Name

    ' -> DETTE ER AFSENDERENS E-MAIL ADRESSE FRA FORMULAR FELTET.
    JMail.Sender = strRecipient_Email

    ' -> DETTE ER AFSENDERENS SVAR E-MAIL ADRESSE FRA FORMULAR FELTET.
    JMail.ReplyTo = strOrderForm_Email

    ' -> DETTE ER MODTAGERENS E-MAIL ADRESSE OG NAVN ("E-MAIL ADRESSE", "NAVN").
    JMail.AddRecipientBCC strRecipient_Email

    ' -> DETTE ER MODTAGERENS E-MAIL ADRESSE OG NAVN ("E-MAIL ADRESSE", "NAVN").
    ' -> BEMÆRK: DETTE SENDER EN KOPI AF ORDREN TIL AFSENDEREN FRA FORMULAREN.
    JMail.AddRecipient strOrderForm_Email

    ' -> DETTE ER EMNET PÅ E-MAIL'EN.
    JMail.Subject = "e-shop'en - Ordre"

    ' -> DETTE ANGIVER PRIORITETEN: 1 = HØJ, 3 = NORMAL, 5 = LAV.
    JMail.Priority = 3

    ' -> DETTE ANGIVER INDHOLDETS TYPE.
    JMail.ContentType = "text/plain"

    ' -> DETTE ER INDHOLDET AF E-MAIL'EN. STANDARD TEKST ER KOMBINERET MED FORMULAR VARIABLER.
    JMail.Body = OrderMailText

    JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")

    JMail.Execute
    Set JMail = Nothing

    End If
    End If

' ---------> HER SLUTTER MAIL KOMPONENTEN.

%>
<%If OK = 0 Then%>
<table align="center" border="0" cellpadding="0" cellspacing="0" width="440">
<tr>
<td align="left" valign="top" width="100%">

<%=OrderSubmitted%>

<!-- ORDRE HER - START -->

<table align="center" border="0" cellpadding="0" cellspacing="0" width="350">
<tr>
<td align="left" valign="top" width="100%">
<p><span class="order"><%
    If Not isNull(OrderMailText) Then
    OrderMailText = Replace(OrderMailText, vbCrLf, "<br clear='all'>")
    Response.Write OrderMailText
    End If
%></span></p>
</td>
</tr>
</table>

<!-- ORDRE HER - SLUT -->

</td>
</tr>
</table>
<%Else%><table align="center" border="0" cellpadding="0" cellspacing="0" width="440">
<tr>
<td align="left" valign="top" width="100%">

<%=OrderFailed%>
</td>
</tr>
</table>

<center>
<p>- <a href="java script:history.go(-1);">TILBAGE</a> -</p>
</center>
<%End If%>
<%
    rs.Close
    db.Close
    Set rs = Nothing
    Set db = Nothing
    Erase Kategorier
%>
</td>
</tr>
</table>

<!-- INDHOLD SLUT -->

<!-- TOM TABEL FOR AT GIVE MERE PLADS -->

<table align="center" border="0" cellpadding="0" cellspacing="0" width="600">
<tr>
<td align="center" valign="top" width="100%">
<p>&nbsp;</p>
</td>
</tr>
</table>

<!-- FODNOTE START -->

<table align="center" border="0" cellpadding="0" cellspacing="0" width="600">
<tr>
<td align="center" valign="top" width="100%">

<hr noshade size="1" width="100%">

<p><span class="small">| e-shop |</span></p>

</td>
</tr>
</table>

<!-- FODNOTE SLUT -->

</body>
</html>
Avatar billede brianalbertsen Nybegynder
22. februar 2005 - 13:06 #22
jmail.SMTPMail error '8000ffff'

The message was undeliverable. All servers failed to receive the message

/e-shop/order_send.asp, line 204


Med den kode du gav mig giver den mig denne fejl. Hvilken form skal jeg bruge hvis mit webhotel er cliche.dk?

Synes ikke jeg kan finde noget om det derinde!
Avatar billede brianalbertsen Nybegynder
22. februar 2005 - 13:15 #23
Det virker fint nu. smtp.cliche.dk skulle jeg bruge fandt det.

Mange tak for hjælpen.
Avatar billede cdc Novice
22. februar 2005 - 15:50 #24
selv tak for points

//cdc
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
IT-kurser om Microsoft 365, sikkerhed, personlig vækst, udvikling, digital markedsføring, grafisk design, SAP og forretningsanalyse.

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester