ช่วยด้วย ด่วน... ถ้าต้องการให้ขึ้น msgBox ขึ้นมาให้เวลาที่กรอกตัวเลขในช่อง textbox เป็น 0 เวลาหาร ว่า "ค่าต้องมากกว่าศูนย์"
เช็คก่อนค่อยส่งค่าไปดำเนินการสิครับคือเช็คว่าเค้าเลือก "หาร" รึเปล่า แล้วก็มาเช็คว่าค่า number2 = 0 รึเปล่าถ้าเท่ากับ 0 ก็ให้โชว์ ข้อความ หรืออีกวิธีคือ ส่งค่ามาแล้วมาเช็คค่าก่อนว่าเป็นหารรึเปล่า แล้วค่า request.form("number2") = 0 รึเปล่า แล้วค่อยนำค่าไปดำเนินการ
Date :
21 ก.ย. 2550 10:16:11
By :
art
ยังไง ช่วยโค๊ดให้ทีหมดปัญญาจริงๆ ใช้จากโค๊ดด้านบนน่ะคะ
Date :
21 ก.ย. 2550 10:20:44
By :
aa
<%
Dim a,b,c,answer, check
Operator=array("บวก","ลบ","คูณ","หาร","ยกกำลัง")
a=CInt(request.form("number1"))
b=CInt(request.form("number2"))
c=request.Form("list")
check = 0
if((c="4") AND ((b=0) OR (b=""))then
check=1
end if
if(check =0)then
Select Case c
case 1
answer = a+b
case 2
answer = a-b
case 3
answer = a*b
case 4
answer = a/b
case 5
answer = a^b
case else
End Select
response.Write("ผลลัพธ์คือ::"&answer)
end if
%>
น่าจะใช้ได้นะครับ
Date :
21 ก.ย. 2550 10:46:18
By :
art
Error Type:
Microsoft VBScript compilation (0x800A03EE)
Expected ')'
/learn/fomular.asp, line 59, column 32
if((c="4") and ((b=0) or (b=""))then
ต้องแก้ยังไงค่ะ
Date :
21 ก.ย. 2550 10:50:39
By :
aa
ใส่วงเล็บไม่ครบรึเปล่าครับดู ที่วงเล็บ
Date :
21 ก.ย. 2550 11:04:56
By :
art
รบกวนอีกครังค่ะเราจะทำให้ให้มันขึ้นไดอะล็อคบ็อคขึ้นมาฟ้องถ้ากรอกเลขศูนย์ต้องใช้ฟังก์ชันว่าอะไรคะ รบกวนด้วยค่ะ
ต้องขอขอบคุณมากเลยค่ะที่ช่วยตอบและโค๊ดให้ ขอเมล์หน่อยได้ไหมค่ะคุณ art
Date :
21 ก.ย. 2550 11:05:55
By :
aa
if((c="4") AND ((b=0) OR (b=""))then
response.write "ข้อความที่แสดง"
check=1
end if
อย่างนี่ได้ไหมเหรอครับ
Date :
21 ก.ย. 2550 12:01:52
By :
art
ได้แล้วค่ะขอบคุณค่ะที่ช่วยเหลือนะคะ
ขอบคุณมากๆค่ะ ไม่งั้นแย่แน่เลย ทำยังไงถึงจะเข้าใจคำสั่งที่มีเงื่อนไขได้ค่ะ พดดีมีปัญหาเกี่ยวกับการเขียนโปรแกรมและจะต้องทำด้านนี้ด้วย
เราไม่มีความรู้เรื่องการโค๊ดเลย แต่ต้องโค๊ดด้วยภาษาเอเอชพี ทำยังไงจะสามารถรู้เรื่องและเข้าใจได้ค่ะช่วยบอดทีค่ะ รู้สึกท้อจังกับการเขียน เพราะว่าแค่คำสั่งง่ายๆแต่ก็ทำไม่ได้ค่ะ
ขอบคุณอีกครั้งค่ะ และเมล์ที่ให้ด้วยนะคะ
Date :
21 ก.ย. 2550 12:04:19
By :
aa
Load balance : Server 02