|
|
|
มัน ขึ้น Error ยังงี้อ่ะครับ Variable is undefined แปลว่าไรครับ |
|
|
|
|
|
|
|
เหอ ๆ มันหมายความว่าไม่มีการประกาศตัวแปร หรือว่าตัวแปรที่เรียกใช้ไม่ถูกต้อง ถ้าอยากรู้ว่าผิดตรงไหนก็เอาโค้ดมาให้ดูหน่อยจิจะได้บอกถูกว่าตัวไหนผิด
|
|
|
|
|
Date :
8 ก.ค. 2548 08:44:27 |
By :
นายกระจอก |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
โค้ด เป็นยังงั้ครับ ขอบคุณครับ
<%@ codepage="874" %>
<% Option Explicit %>
<%
If Session("cartempty") = True Then Response.Redirect "ssviewcart.asp"
%>
<!--#include file="dbconnect.asp" -->
<html>
<head><title></title></head>
<body bgcolor="#FFFFFF" text="#000000">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="24%" valign="top">
<!--#include file="menu.asp" -->
</td>
<td width="76%" valign="top">
<%
CONST CARTPID=0
CONST CARTPNAME=1
CONST CARTPPRICE=2
CONST CARTPQUANTITY=3
Dim localCart, aShip, aCust, aPay, orderTotal, grandTotal
Dim today, sql, rs, orderid, i,user
Dim sSubject, sBody
orderTotal = Session("orderTotal")
localCart = Session("cart")
user= Session("user")
On Error Resume Next
If ConnectDB() = True Then
Session.LCID = 1033
today = Now()
sql = "insert into ORDER (Order_Date,P_Price,Sum_Seat) " & _
"values (#"&today&"#,"& orderTotal &","& localCart(CARTPQUANTITY,i) &")"
Conn.BeginTrans
Conn.Execute sql
sql = "select Order_ID from ORDER"
Set rs = Conn.Execute(sql)
orderid = rs(0)
rs.Close
Set rs = Nothing
For i = 0 To UBound(localCart,2)
If localCart(CARTPID,i) <> "" Then
sql = "insert into OrderDetails (Order_ID,Plane_Number,P_From,PPrice,Qty,SubTotal) " & _
"values ("& orderid &","& localCart(CARTPID,i) &",'"& localCart(CARTPNAME,i) &"',"& localCart(CARTPPRICE,i) &","& localCart(CARTPQUANTITY,i) &","& (localCart(CARTPPRICE,i) * localCart(CARTPQUANTITY,i)) &")"
Conn.Execute sql
End If
Next
'--------------------------------------------------------------------
If Err.Number = 0 Then
Conn.CommitTrans
Response.Write "<br><br><br><center>"
Response.Write "<b>àÃÒä´éÃѺ¤ÓÊÑ觫×éͨҡ·èÒ¹àÃÕºÃéÍÂáÅéÇ ¢Í¢Íº¤Ø³·ÕèãªéºÃÔ¡ÒÃ<br>"
Response.Write "ËÇѧà»ç¹ÍÂèÒ§ÂÔè§ÇèÒ¤§ÁÕâÍ¡ÒÊä´éãËéºÃÔ¡Ò÷èÒ¹Íա㹤ÃÒǵèÍä»</b>"
Response.Write "<br><a href=index.asp>˹éÒÃéÒ¹ (Storefront)</a></center>"
Session.Abandon
Else
Conn.RollBackTrans
Response.Write "ÃËÑÊÊÑ觫×éͤ×Í " & Order_ID & "<br>"
Response.Write "<br><br><br><center>"
Response.Write "äÁèÊÒÁÒöÃѺ¤ÓÊÑ觫×éͨҡ·èÒ¹ä´é à¹×èͧ¨Ò¡...<br>"
Response.Write "<b>" & Err.Description & "</b><br>"
Response.Write "¡ÃسҵԴµèÍ·Ò§ÃéÒ¹¤éÒàÃÒâ´ÂµÃ§¤ÃѺ</center>"
End If
End If
%>
</td>
</tr>
</table>
</body>
</html>
|
|
|
|
|
Date :
8 ก.ค. 2548 10:23:47 |
By :
kicub2 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
เหอร์ ๆๆ ปวดหัวไปเลย
|
|
|
|
|
Date :
8 ก.ค. 2548 13:25:33 |
By :
Ton |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
ใช่ เอาซะปวดหัวปายเลยอ่า
|
|
|
|
|
Date :
2010-12-05 12:16:51 |
By :
ชายนิรนาม |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
มันบอกไหมคับ บรรทัดไหน .... ปกติจะมีบอกนะ ASP
|
|
|
|
|
Date :
2010-12-10 10:44:53 |
By :
inanosms |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Load balance : Server 05
|