電子商務(wù)課程設(shè)計(jì)—購(gòu)物網(wǎng)站(存儲(chǔ)版)
【正文】 objRs = () strRs, Application(strCn), 2, 2 strOrderNum = objRs(orderNo) % html body h2 align=center style=color:ee1090確認(rèn)訂單 /h2 hr form method=post action=?ONo=% = strOrderNum % table align=center tr th width=160產(chǎn) 品 名 稱 /th th width=100 align=right單價(jià) /th th width=60 align=right數(shù)量 /th th width=100 align=right小計(jì) /th th width=60/th /tr % intI = 0 Do Until objRs(unitPrice) = objRs(price) % tr td% = objRs(descript) %/td td align=right% = FormatNumber(objRs(unitPrice), 0) %/td td align=right input type=text name=cqty value=% = objRs(qty) % size=3/td td align=right% lngSubTot = objRs(qty) * _ objRs(unitPrice) lngTotal = lngTotal + lngSubTot strSubTot = FormatNumber(lngSubTot, 0) (strSubTot) %/td td align=rightinput type=submit name=update% =CStr(intI) % value=更新 /td /tr % intI = intI + 1 Loop % trtd height=10 colspan=5/td/tr tr td colspan=3 align=right本單金額合計(jì)： /td td align=right % lngTotal = calcDis(lngTotal) objRs(totalPrice) = lngTotal (FormatNumber(lngTotal, 0)) Set objRs = Nothing % /td td/td /tr trtd height=15 colspan=5/td/tr tr align=center td colspan=5 input type=submit name=confirm value= 確 定 /td /tr /table /form % Call showLogo % /body /html 數(shù)據(jù)庫(kù)的設(shè)計(jì) 數(shù)據(jù)庫(kù)各種字符設(shè)置，如下表 表 名稱 字符類型 NULL 用戶名 Char NOT NULL 密碼 Char NOT NULL 姓名 Char NOT NULL 地址 Char NOT NULL 郵箱 Char NULL 性別 Char NULL 年齡 Char NULL 電話 Char NULL 4 系統(tǒng)實(shí)現(xiàn) 網(wǎng)站首頁(yè) 。 _ LEFT JOIN product amp。 39。 strRs2 = SELECT * amp。 _ AND status = 39。 _ FROM (orders LEFT JOIN orderDetail amp。 _ Chr(34)) End If % /td/tr tr td align=right性別： /td td input type=radio name=sex value=女 % If blnOK Then If strSex = 女 Then (checked) End If End If % 女 input type=radio name=sex value=男 % If blnOK Then If strSex = 男 Then (checked) End If End If % 男 /td /tr tr valign=top td align=right年齡： /td td select name=age option % If blnOK Then If intAge = 19 Then (selected) End If End If % 20 以下 /option option % If blnOK Then If intAge = 20 Then (selected) End If End If % 20 ~ 29/option option % If blnOK Then If intAge = 30 Then (selected) End If End If % 30 ~ 39/option option % If blnOK Then If intAge = 40 Then (selected) End If End If % 40 ~ 49/option option % If blnOK Then If intAge = 50 Then (selected) End If End If % 50 ~ 59/option option % If blnOK Then If intAge = 60 Then (selected) End If End If % 60(含 )以上 /option /select /td /tr tr td align=center input type=submit value= 確定 /td td align=cent
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1