add bestilling til database ved submit fra indkøbsvogn????
Her er asp + html men skal bruge add til DB også.Nogen forslag.
<%
Dim minConn, SQL_streng, RS
\' Åbn forbindelse
Set minConn = Server.CreateObject(\"ADODB.Connection\")
DSNtemp=\"DRIVER={Microsoft Access Driver (*.mdb)}; \"
DSNtemp=dsntemp & \"DBQ=\" & server.mappath(\"db\\kaffe.mdb\")
minConn.Open DSNtemp
\' sql udsagn
SQL_query = \"SELECT * FROM kaffe ORDER BY navn\"
Set RS = minConn.Execute(SQL_query)
%>
<%username = request.cookies(\"passes\")%>
<%friendlyname = request.cookies(\"passes2\")%>
<%firma = request.cookies(\"passes3\")%>
<%If request.cookies(\"passes\") = \"\" then response.redirect (\"login.asp\")%>
<html>
<head>
<title>Login</title>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=iso-8859-1\">
<link rel=\"stylesheet\" href=\"style.css\" type=\"text/css\">
</head>
<body bgcolor=\"#000000\" text=\"#000000\">
<table width=\"850\" border=\"0\" cellpadding=\"0\" cellspacing=\"0\" bgcolor=\"#006699\">
<tr>
<td valign=\"middle\" height=\"98\" width=\"202\" align=\"left\" bgcolor=\"#000000\"><img src=\"..//Billeder/logo2.jpg\" width=\"200\" height=\"40\"></td>
<td valign=\"middle\" colspan=\"2\" bgcolor=\"#993300\" align=\"center\"><object classid=\"clsid:D27CDB6E-AE6D-11cf-96B8-444553540000\" codebase=\"http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=4,0,2,0\" width=\"105\" height=\"21\">
<param name=movie value=\"index.swf\">
<param name=quality value=high>
<param name=\"BASE\" value=\".\">
<param name=\"BGCOLOR\" value=\"#993300\">
<embed src=\"index.swf\" base=\".\" quality=high pluginspage=\"http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash\" type=\"application/x-shockwave-flash\" width=\"105\" height=\"21\" bgcolor=\"#993300\">
</embed>
</object> <object classid=\"clsid:D27CDB6E-AE6D-11cf-96B8-444553540000\" codebase=\"http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=4,0,2,0\" width=\"105\" height=\"21\">
<param name=movie value=\"info.swf\">
<param name=quality value=high>
<param name=\"BASE\" value=\".\">
<param name=\"BGCOLOR\" value=\"#993300\">
<embed src=\"info.swf\" base=\".\" quality=high pluginspage=\"http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash\" type=\"application/x-shockwave-flash\" width=\"105\" height=\"21\" bgcolor=\"#993300\">
</embed>
</object> <object classid=\"clsid:D27CDB6E-AE6D-11cf-96B8-444553540000\" codebase=\"http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=4,0,2,0\" width=\"105\" height=\"21\">
<param name=movie value=\"prod.swf\">
<param name=quality value=high>
<param name=\"BASE\" value=\".\">
<param name=\"BGCOLOR\" value=\"#993300\">
<embed src=\"prod.swf\" base=\".\" quality=high pluginspage=\"http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash\" type=\"application/x-shockwave-flash\" width=\"105\" height=\"21\" bgcolor=\"#993300\">
</embed>
</object><object classid=\"clsid:D27CDB6E-AE6D-11cf-96B8-444553540000\" codebase=\"http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=4,0,2,0\" width=\"105\" height=\"21\">
<param name=movie value=\"link.swf\">
<param name=quality value=high>
<param name=\"BASE\" value=\".\">
<param name=\"BGCOLOR\" value=\"#993300\">
<embed src=\"link.swf\" base=\".\" quality=high pluginspage=\"http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash\" type=\"application/x-shockwave-flash\" width=\"105\" height=\"21\" bgcolor=\"#993300\">
</embed>
</object> <object classid=\"clsid:D27CDB6E-AE6D-11cf-96B8-444553540000\" codebase=\"http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=4,0,2,0\" width=\"105\" height=\"21\">
<param name=movie value=\"handel.swf\">
<param name=quality value=high>
<param name=\"BASE\" value=\".\">
<param name=\"BGCOLOR\" value=\"#993300\">
<embed src=\"handel.swf\" base=\".\" quality=high pluginspage=\"http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash\" type=\"application/x-shockwave-flash\" width=\"105\" height=\"21\" bgcolor=\"#993300\">
</embed>
</object> <object classid=\"clsid:D27CDB6E-AE6D-11cf-96B8-444553540000\" codebase=\"http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=4,0,2,0\" width=\"105\" height=\"21\">
<param name=movie value=\"kontakt.swf\">
<param name=quality value=high>
<param name=\"BASE\" value=\".\">
<param name=\"BGCOLOR\" value=\"#993300\">
<embed src=\"kontakt.swf\" base=\".\" quality=high pluginspage=\"http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash\" type=\"application/x-shockwave-flash\" width=\"105\" height=\"21\" bgcolor=\"#993300\">
</embed>
</object></td>
<td valign=\"middle\" colspan=\"2\" bgcolor=\"#993300\" align=\"left\"><object classid=\"clsid:D27CDB6E-AE6D-11cf-96B8-444553540000\" codebase=\"http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0\" width=\"212\" height=\"80\">
<param name=movie value=\"MERRILD.swf\">
<param name=quality value=high>
<embed src=\"MERRILD.swf\" quality=high pluginspage=\"http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash\" type=\"application/x-shockwave-flash\" width=\"212\" height=\"80\">
</embed>
</object></td>
</tr>
<tr>
<td valign=\"top\" height=\"593\" bgcolor=\"#000000\"> </td>
<td width=\"14\" valign=\"top\" bgcolor=\"#993300\"> </td>
<td valign=\"top\" width=\"411\" bgcolor=\"#FFFFFF\">
<table width=\"100%\" border=\"0\" cellpadding=\"0\" cellspacing=\"0\" bgcolor=\"#FFFFFF\">
<tr>
<td height=\"121\" width=\"411\">
<center>
<table WIDTH=\"90%\" BORDER=\"0\" CELLSPACING=\"4\" CELLPADDING=\"0\" ALIGN=\"center\">
<tr>
<td WIDTH=\"36\" height=\"38\" valign=\"top\" align=\"left\"><img src=\"..//Billeder/litenkopp.gif\" width=\"30\" height=\"38\"></td>
<td WIDTH=\"322\" VALIGN=\"bottom\"> <font class=\"ov\"> Velkommen
<%=friendlyname%>. <br>
Type kunde : <%=firma%></font></td>
</tr>
<tr>
<td height=\"52\" COLSPAN=\"2\" valign=\"top\" BGCOLOR=\"#FFFFFF\">
<font class=\"text\">Indkøbsiden skal så være
her.....<br>
</font><br>
</td>
</tr>
</table>
</center>
</td>
</tr>
<tr>
<td height=\"180\" valign=\"top\">
<table width=\"100%\" border=\"2\" cellpadding=\"0\" cellspacing=\"0\">
<tr>
<td width=\"68\" height=\"20\">
<%
WHILE NOT RS.EOF IF CellColor = \"FFFFFF\" THEN CellColor = \"993333\" ELSE CellColor = \"FFFFFF\" END IF
%>
<td width=\"335\"></td>
<tr valign=top BGCOLOR=\"#<%=CellColor%>\">
<td height=\"135\" colspan=\"2\" valign=\"top\" align=\"center\"><%=RS(\"navn\")%>
<br>
<font class=\"text\">Vejledende pris</font>:
<%=RS(\"vejlpris\")%>kr.<br>
<font class=\"text\">Internet pris:</font>
<%=RS(\"netpris\")%>kr.<br>
<font class=\"text\">Antal stk:</font>
<%=RS(\"antalcolli\")%>stk.<br>
<font class=\"text\">vægt pr. stk.:</font>
<%=RS(\"stkvægt\")%>gram<br>
<br>
<a href=\"prodinfo.asp?per=<%=RS( \"stregkode\" )%>\">videre</a>
</td>
</tr>
<tr valign=top>
<td height=\"21\" bgcolor=\"#<%=CellColor%>\"></td>
<td bgcolor=\"#<%=CellColor%>\"></td>
</tr>
<%
RS.MoveNext
WEND
%>
</table>
</td>
</tr>
</table>
</td>
<td width=\"212\" valign=\"top\">
<table width=\"100%\" border=\"0\" cellpadding=\"0\" cellspacing=\"0\">
<tr>
<td width=\"15\" height=\"12\"></td>
<td width=\"182\"></td>
<td width=\"15\"></td>
</tr>
<tr>
<td height=\"71\"></td>
<td valign=\"top\" bgcolor=\"#FFCC66\"> </td>
<td></td>
</tr>
<tr>
<td height=\"37\"></td>
<td></td>
<td></td>
</tr>
<tr>
<td height=\"224\"></td>
<td valign=\"top\" bgcolor=\"#FFCC66\"> </td>
<td></td>
</tr>
<tr>
<td height=\"249\"></td>
<td></td>
<td></td>
</tr>
</table>
</td>
<td width=\"11\" valign=\"top\" bgcolor=\"#993300\"> </td>
</tr>
</table>
</body>
</html>
