|
|
|
ถามคุณ มักกะโรนีกะหมากเก็บ ที่เคยโพสถามเรื่องวนลูปบันทึกน่ะค่ะ ลองเอาโค้ดมาประยุกใส่แต่เออเรอค่ะ |
|
|
|
|
|
|
|
ที่เคยโพสถามเรื่องวนลูปบันทึกน่ะค่ะ
ลองเอาโค้ดมาประยุกใส่แต่เออเรอค่ะ ช่วยดูให้หน่อยนะคะ
If (Request("chkbxnm_accessnew") <> "") then
("chkbxnm_accessnew")
gtotalLine = request("total_line")
for i = 1 to gtotalLine
if lcase(request("chkbxnm_accessnew"&i))= "on" then // บรรทัดนี้หมายความว่าอะไรหรอคะ
sql = ""
sql = "Insert Into VSC_OPN_MST"
sql = sql & " (OM_OPN_CD,"
sql = sql & " OM_OPN_NM,"
sql = sql & " OM_SUP_CD,"
sql = sql & " OM_GRP_CD,"
sql = sql & " OM_STK_AMT,"
sql = sql & " OM_FR_DT,"
sql = sql & " OM_DISPLAY,"
sql = sql & " OM_CRE_BY,"
sql = sql & " OM_CRE_DT) "
sql = sql & " Values ('"&Session("RidNew_access")&"' , "
sql = sql & " '"&Request("nmaccessnew1")&"' , "
sql = sql & " '"&Request("chkbxnm_accessnew")&"', "
sql = sql & " '"&Request("codeaccessnew1")&"', "
sql = sql & " '"&Request("nmaccessnew2")&"', "
sql = sql & " '"&Request("begin_date")&"' , "
sql = sql & " '"&Request("codeaccessnew3")&"' , "
sql = sql & " '" &Session("IduNew_access")& "' , "
sql = sql & " '" &DateNow& "' )"
set rs = conn.execute(sql)
หน้าจอเป็นแบบนี้ค่ะ มี ตัว checkbox มาให้เลือกติ๊ก แทนด้วย ..... textbox แทนด้วย____
เราสามารถเลือกผู้จำหน่ายได้มากกว่า 1 ค่ะ
ชื่ออุปกรณ์ ______
ผู้จำหน่าย
... นาย ก
... นาย ข
.....นาย ค
Tag : - - - -
|
|
|
|
|
|
Date :
28 ก.ย. 2549 15:35:03 |
By :
เพรียว |
View :
1702 |
Reply :
1 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
ลืมบอกไปค่ะ พอเลือกแล้วกด บันทึก
มันเออเรอแบบนี้ค่ะ
set rs = conn.execute(sql)
บบรทัดนี้
access_new_vat_pr = 0.00
access_new_buy_pr = ""
access_new_buy_pr = Request("nmaccessnew11")
If (access_new_buy_pr <> "") then
If (Cdbl(access_new_buy_pr) > 0) then
access_new_vat_pr = (Cdbl(access_new_buy_pr) * Cdbl(access_new_vat)) + Cdbl(access_new_buy_pr)
Else
access_new_vat_pr = 0.00
End If
Else
access_new_buy_pr = 0.00
End If
เป็นโค้ด ตอนที่ กรอกราคาให้กับผู้จำน่ายอุปกรณ์แต่ละเจ้าน่ะค่ะ
ชื่ออุปกรณ์ ______
ผู้จำหน่าย
... นาย ก ราคาทุน__ ราคาขายก่อน vat __
... นาย ข ราคาทุน__ ราคาขายก่อน vat __
....นาย ค ราคาทุน__ ราคาขายก่อน vat __
|
|
|
|
|
Date :
28 ก.ย. 2549 15:54:41 |
By :
preaw |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Load balance : Server 05
|