06. marts 2001 - 12:07
Der er
15 kommentarer og 1 løsning
Skal bruge ASP script til køb/salg
Hej Jeg skal bruge en ASP-side til mit web-site hvor brugere kan sætte ting til salg og købes på siden. Det skal laves så det er tidsbestemt hvorlang tid det skal stå til salg, brugeren skal så definere hvorlangt tid det er. Følgende feltnavne skal bruges: Navn: E-mail: Tlf.: Sælges/beskrivelse: Varighed til salg: Er der nogen der vil/kan lave det eller noget lignende til mig? Skriv tilbage hvis i kan/vil så får i min e-mail adresse.
Annonceindlæg fra Infor
06. marts 2001 - 12:32
#1
Kan jeg sagtens...
06. marts 2001 - 12:35
#2
henrik-friis@mail.tele.dk Lyder godt ... tak Du kan bare maile når du har noget klar.
06. marts 2001 - 21:54
#3
Skal det ikke være noget auktion ting?
07. marts 2001 - 08:04
#4
Ikke auktion brugeren skal bare kunne sætte en annonce på siden som eksempelvis har en gyldighedsperiode på en måned.
07. marts 2001 - 08:51
#5
har du fået et svar ? Eller kan jeg også nå at gøre et forsøg....?
07. marts 2001 - 08:54
#6
kasseper>> Du må gerne komme med et bud. Jeg hæver lige point til 320 point så der er nok hvis i begge har et godt bud!
07. marts 2001 - 09:00
#7
Er vi enige om at du selv klare selve designet ??? Jeg er ikke nogen ørn til at tegne :)
07. marts 2001 - 09:02
#8
Der skal jo bruges en database, er det en du selv har lavet, eller skal jeg alve den også ???
07. marts 2001 - 09:03
#9
Jeg skal nok selv lave designet. Du må gerne lave en access database - :-)
07. marts 2001 - 10:23
#10
Her er min kode : *********************** <% dim navn, email, tlf, besk, nedl1, nedl2 navn = request.form(\"navn\") email = request.form(\"email\") tlf = request.form(\"tlf\") besk = request.form(\"beskrivelse\") nedl1 = request.form(\"nedlagges\") nedl2 = dateAdd(\"d\",nedl1,date()) DBPath = \"DRIVER={Microsoft Access Driver (*.mdb)}; \" DBPath = DBPath & \"DBQ=\" & server.mappath(\"mydb.mdb\") set objConn = server.createobject(\"ADODB.connection\") objConn.Open DBPath if navn <> \"\" then SQL = \"insert into mytable (Navn, Email, Tlf, Sb, oprettet, nedlagges) Values (\'\" SQL = SQL & navn & \"\', \'\" & email & \"\', \'\" & tlf & \"\', \'\" & besk & \"\', #\" & date() & \"#, #\" & nedl2 & \"#)\" objConn.execute(SQL) end if SQL = \"delete from mytable where nedlagges < #\" & date() & \"#\" objConn.execute(SQL) SQL = \"select * from mytable where oprettet <= #\" & date() & \"#\" set rs = objConn.execute(SQL) %> <html> <head> <title> KØB OG SALG </title> </head> <body> Køb og salg <table border=\"2\"> <tr> <td>Oprettet af :</td> <td>E-mail adresse :</td> <td>Telefon nummer : </td> <td>Sælges/beskrivelse : </td> <td>Sidste salgsdag : </td> </tr> <% while NOT rs.eof %> <tr> <td><%= rs(\"Navn\")%></td> <td><%= rs(\"Email\") %></td> <td><%= rs(\"Tlf\") %></td> <td><%= rs(\"Sb\") %></td> <td><%= rs(\"nedlagges\") %></td> </tr> <% rs.movenext wend %> </table> <form action=\"visside.asp\" method=\"post\"> <br> opret et indlæg :<br> Navn : <input type=\"text\" name=\"navn\"><br> Email : <input type=\"text\" name=\"email\"><br> Telefonnummer : <input type=\"text\" name=\"tlf\"><br> Sælges/Beskrivelse : <br> <textarea name=\"beskrivelse\"></textarea><br> hvor længe : <input type=\"text\" name=\"nedlagges\"><br> <input type=\"submit\" value=\"Indsend\"> </form> <% rs.Close set rs = nothing objConn.Close set objConn = Nothing %> </body> </html> **************** databasen har jeg sendt, og begge filer skal ligge i samme bibl. Håber du kan bruge det, hvis der er fejl må du lige råbe op.
07. marts 2001 - 10:37
#11
Det virker fint - tak skal du ha` :-)
07. marts 2001 - 10:39
#12
my pleasure :)
07. marts 2001 - 10:45
#13
Hej kasseper Lige nu lægger den nye indlæg nederst i tabellen. Kan man ikke gøre så de nye indlæg kommer øverst i tabellen?
07. marts 2001 - 10:47
#14
Joohhh, det kan jeg da... Altså rent database mæssigt, kan man ikke lige gøre det, men når du ser dem på siden, kan du bare erstatte denne linie : SQL = \"select * from mytable where oprettet <= #\" & date() & \"#\" Med SQL = \"select * from mytable where oprettet <= #\" & date() & \"# order by oprettet\"
07. marts 2001 - 10:56
#15
Endnu engang tak!
07. marts 2001 - 10:59
#16
selv tak
Kurser inden for grundlæggende programmering