Avatar billede france Novice
12. september 2003 - 16:42 Der er 22 kommentarer og
2 løsninger

vedr. indkøbskurv

Hej

Jeg har hentet et script via hotscripts.com eftersom jeg ikke er god til asp.
Og det ses og nu... :)

Jeg har fået tilpasset stort set alt, undtagen lige at afsende ordren.

Der skal rettes i 2 filer, men jeg ved ikke hvad.
Jeg emailer dig gerne de 2 filer, da de ville fylde for meget her på siden. Samttidigt skriver jeg hvad den skal gøre...
Avatar billede Slettet bruger
12. september 2003 - 17:12 #1
kvadratrodenaf1@hotmail.com
Avatar billede Slettet bruger
12. september 2003 - 17:38 #2
Hvilke af disse felter skal ikke bruges???

Request.Form("strFirst")
Request.Form("strLast")
Request.Form("strEmail")
Request.Form("strAddress1")
Request.Form("strAddress2")
Request.Form("strCity")
Request.Form("strState")
Request.Form("strPostalCode")
Request.Form("strCountry")
Request.Form("strPhone")
Request.Form("strShipFirst")
Request.Form("strShipLast")
Request.Form("strShipAddress")
Request.Form("strShipCity")
Request.Form("strShipState")
Request.Form("strShipPostalCode")
Request.Form("strShipCountry")
Request.Form("strShipMethod")
Avatar billede Slettet bruger
12. september 2003 - 17:39 #3
hvis du har spm. til, hvad de forskellige indeholder, skal du bare spørge...
Avatar billede france Novice
12. september 2003 - 17:45 #4
Jeg tror jeg ved hvad de indeholder... men jeg skal som sagt bare bruge 2 oplysninger.... brugernavn og password - så brug bare hhv. strFirst og strLast til dette formål...
Avatar billede Slettet bruger
12. september 2003 - 17:51 #5
det er bare fordi, der ikke står noget med password.... kun for- og efternavn.. men det er kun dem, du skal bruge??? ikke adressen?
Avatar billede france Novice
12. september 2003 - 17:54 #6
netop... det skal bruges til et privat fodboldspil, hvor jeg kun behøver at kende et brugernavn og et password - så 2 felter er nok :)
Avatar billede Slettet bruger
12. september 2003 - 17:55 #7
k... det tar måske 5-10 min, for jeg skal også slette de overflødige felter i checkout..
Avatar billede Slettet bruger
12. september 2003 - 17:56 #8
men er det du så skal bruge ikke bare et loginsystem??
Avatar billede france Novice
12. september 2003 - 18:00 #9
nej... det er et indkøbssysmtem til et spil jeg har lavet.... du kan kigge på www.fantasyfootball.dk/handler
og så kan du se hvad der sker når du prøver at afslutte handlen...
Avatar billede france Novice
12. september 2003 - 18:13 #10
Har du selv kigget på det link jeg gav dig ?
Og skal jeg sende dig database filen ?... hvis det har nogen betydning ?
Avatar billede Slettet bruger
12. september 2003 - 18:16 #11
nej... du behøver ikke sende noget til mig... prøv at skifte linje 21 i validateorder ud med

    Response.Write "<img border='0' height='64' src='images/mcartfree.gif' width='249'><br><br>"
Avatar billede france Novice
12. september 2003 - 18:21 #12
det har vel ikke noget med et billed at gøre ?!
Jeg kan sende dig hele den mappe som jeg har hentet på nettet hvor samtlige filer ligger i... hvis det kan hjælpe ?
Avatar billede Slettet bruger
12. september 2003 - 18:28 #13
jeg har sendt dig 2 mails... den ene glemte jeg at hæfte en fil ved...
Avatar billede Slettet bruger
12. september 2003 - 18:28 #14
jeg har fjernet noget overflødigt kode...
Avatar billede Slettet bruger
12. september 2003 - 18:30 #15
nu fik jeg sendt en forkert fil... hehe... den rigtige kommer nu....
Avatar billede Slettet bruger
12. september 2003 - 18:38 #16
koden kan faktisk koges ned til dette... du behøver ikke at ændre i checkout.asp... det er ikke det, der laver fejl.. prøv at copy-paste det her... jeg skal lige spise nu, men er tilbage om under en halv time...

<%@ Language=VBScript %>
<%
'******************************************************
'Copyright©2000-2002 MetaLinks.com @ http://metalinks.com
'****************************************************** 

%>
<% pageTitle = "Validate Order" %>
<!--#include file="adovbs.inc"-->
<!--#include file="db.asp"-->
<font face="Arial">
<%
'displays header on form field validation pages
For Each key in Request.Form
        strName = key
        strValue = Request.Form(key)
        Session(strName) = strValue
    Next

    strFirst = Request.Form("strFirst")
    strLast = Request.Form("strLast")

If strFirst = "" then
    Response.Write "<html><head><body>"
    Response.Write "<font size='4'><b>Please enter your first name.</b><br><br><font size='2'>Press your browser's <b>back button</b> to return to form.</font>"
    Response.End
end if
If strLast = "" then
    Response.Write "<html><head><body>"
    Response.Write "<font size='4'><b>Please enter your last name.</b><br><br><font size='2'>Press your browser's <b>back button</b> to return to form.</font>"
    Response.Write "<hr color='#cccccc' size='1' noshade>"
    Response.End
end if


    set Conn = Server.CreateObject("ADODB.Connection")
    Conn.Open ConString

    intOrderID = Request.form("intOrderID")

    set rsOrder = Server.CreateObject("ADODB.Recordset")
    rsOrder.Open "SELECT * FROM orders WHERE orderID = " _
        & intOrderID, Conn, adOpenStatic, adLockOptimistic, _
        adCmdText

    if rsOrder.EOF then
        Response.Write "There is a problem with your order. "
        Response.Write "Please contact customer service."
    else

        rsOrder("fName") = Request.form("strFirst")
        rsOrder("lName") = Request.form("strLast")
       
        Conn.Execute("DELETE FROM itemsOrdered WHERE " _
            & "orderID = " & intOrderID)

        set rsItem = Server.CreateObject("ADODB.Recordset")
        rsItem.Open "itemsOrdered", Conn, adOpenStatic, adLockOptimistic, adCmdTable

        for each item in Request.form("strOrderItem")

            strOrderItem = cstr(item)
            itemInfo = split(strOrderItem, ",")

            rsItem.addNew
            rsItem("orderID") = intOrderID
            rsItem("productID") = itemInfo(0)
            rsItem("quantity") = itemInfo(1)
            rsItem.Update

        next
       
        rsItem.Close
        set rsItem = Nothing
       
        Session.abandon
       
    end if
    rsOrder.Close
    set rsOrder = Nothing

    Conn.Close
    set Conn = Nothing

%>


<html>
<head>
<meta name="GENERATOR" Content="Microsoft FrontPage 5.0">
<title><%= pageTitle %></title>
<style type="text/css">
<!--
a:link      { color: #808080 }
a:visited    { color: #808080 }
a:hover      { color: #ff9900 }
-->
</style>
</head>

<body bgcolor="#ffffff">
Avatar billede Slettet bruger
12. september 2003 - 19:00 #17
jeg kigger lige det hele igennem... problemet ligger her:

set rsOrder = Server.CreateObject("ADODB.Recordset")
    rsOrder.Open "SELECT * FROM orders WHERE orderID = " _
        & intOrderID, Conn, adOpenStatic, adLockOptimistic, _
        adCmdText

    if rsOrder.EOF then
        Response.Write "There is a problem with your order. "
        Response.Write "Please contact customer service."

Der er fordi rsOrder ikke indeholder noget endnu, men jeg tjekker lige det hele igennem og kommer med et svar..
Avatar billede france Novice
12. september 2003 - 19:16 #18
lyder godt... bare pas på du ikke ændre for meget i de andre filer :) hehe
Avatar billede Slettet bruger
12. september 2003 - 19:44 #19
Jeg giver op.. Programmøren kører mellem querystrings, sessions og database uden at give forklaring på, hvad de forskellige variabler indeholder... Det kunne være lavet meget mere simpelt.. Sorry, men jeg ikke kunne hjælpe dig..
Avatar billede Slettet bruger
12. september 2003 - 19:45 #20
husk lige at slette mit login til serveren
Avatar billede france Novice
12. september 2003 - 19:53 #21
skal jeg nok.... men jeg har lige afprøvet det - det virker stadig ikke ?
Avatar billede Slettet bruger
12. september 2003 - 19:57 #22
nej... prøv at læse mit indlæg kl 19:44:51... jeg kan desværre ikke hit'u'a'd'
Avatar billede france Novice
12. september 2003 - 19:58 #23
ok... det er jeg ked af - men tak for din tid :)
Avatar billede france Novice
20. november 2003 - 01:35 #24
ok... det er jeg ked af - men tak for din tid :)
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
Kurser inden for grundlæggende programmering

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

Seneste spørgsmål Seneste aktivitet
I går 21:00 Libre Office Impress Af Frank i Andre styresystemer
I går 11:47 VB script Af Jenshentze i Word
I går 11:21 Popup ved opstart Af mort1 i Windows
04/0918:50 Slet lokal konto Af ErikHg i Windows
04/0916:05 Ændre tal i en celle Af xvid i Excel