<%if session("admin")="" then response.Redirect("Administrator_Login.asp") else %> <!DOCTYPE HTML> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=windows-874"> <link href="../css/style.css" rel="stylesheet" type="text/css"> </head> <body> <form method="post" action="resultCredit.asp" enctype="multipart/form-data"> <table width="768" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" height="444"> <!--DWLayoutTable--> <tr> <td height="396" valign="top"><br> <table width="600" border="0" cellpadding="0" cellspacing="0" height="91"> <tr> <td height="71" valign="middle"><table border="0" width="769" height="117"> <!--DWLayoutTable--> <tr> <td >รายละเอียด : </td> <td height="21" align="left"><textarea name="Detail" cols="100" rows="2"></textarea></td> </tr> <tr> <td width="145" >รูปภาพประกอบ : </td> <td width="614" height="21" align="left"><input type="file" name="Images" size="50"></td> </tr> <tr> <td >เงินเดือนขั้นต่ำ :</td> <td height="21" align="left"><textarea name="Salary" cols="100" rows="1"></textarea></td> </tr> <tr> <td >จุดเด่น</td> <td height="21" align="left"><textarea name="Pros" cols="100" rows="8" id="Pros"></textarea></td> </tr> <tr> <td >โปรโมชั่น</td> <td height="21" align="left"><textarea name="Promotion" cols="100" rows="8" id="Promotion"></textarea></td> </tr> </table></td> </tr> </table></td> </tr> <tr> <td width="768" height="48" align="center" valign="middle"> <input type="submit" name="Submit2" value="เพิ่มข้อมูล"> <input type="reset" name="Submit" value="เคลียร์ข้อมูล"></td> </tr> </table></form> </body> </html> <%end if%>
<%@LANGUAGE="VBSCRIPT" CODEPAGE="874"%> <meta http-equiv="Content-Type" content="text/html; charset=windows-874"> <!-- #include file="conn.asp" --> <% if request("Detail")<>"" and request("Pros")<>"" and request("Promotion")<>"" then set rs = server.CreateObject("adodb.recordset") rs.open "select * from Credit_Card",conn,1,3 rs.addnew() rs("Detail")=request("Detail") rs("Salary")=request("Salary") rs("Pros")=request("Pros") rs("Promotion")=request("Promotion") rs("Dat")=Date() rs.update() response.Redirect("Admin_CreditCard.asp") else %> <script language="javascript"> alert("ท่านกรอกข้อมูลไม่ครบ") history.back(-1) </script> <% end if %>
<div class="wrapper3"> <% if rs.recordcount>0 then dim pgNO pgNO= request("page") if pgNO=0 then pgNO=1 if pgNO>0 then dim rcount rcount=1 rs.pagesize=12 rs.absolutepage=pgNO %> <table class="tabletext" border="0" style="border: 1px solid #CCCCCC;margin-bottom: 10px;" width="100%" cellspacing="1" cellpadding="1"> <tbody> <tr> <td colspan="2" align="center" style="height: 28px; font-size: 14px; background-image: url(images/menubar.jpg); color: #FFF;">ธนาคาร/สถาบันการเงิน</td> <td width="14%" align="center" style="height: 28px; font-size: 14px; background-image: url(images/menubar.jpg); color: #FFF;">เงินเดือนขึ้นต่ำ</td> <td width="28%" align="center" style="height: 28px; font-size: 14px; background-image: url(images/menubar.jpg); color: #FFF;">จุดเด่น</td> <td width="28%" align="center" style="height: 28px; font-size: 14px; background-image: url(images/menubar.jpg); color: #FFF;">โปรโมชั่น</td> </tr> <% x=rs.recordcount do while not rs.eof and rcount<=12 %> <tr> <td width="14%" bgcolor="#E8E8E8" class="td_gray4" style="text-align:left;border-right: 1px solid #CCCCCC;"><%=rs("Images")%><br> บัตรเครดิต</td> <td width="16%" bgcolor="#E8E8E8" class="member"><span class="memberred"><%=rs("Detail")%></span></td> <td align="center" bgcolor="#E8E8E8" class="memberred"><%=rs("Salary")%></td> <td bgcolor="#E8E8E8" class="member"><%=rs("Pros")%></td> <td bgcolor="#E8E8E8" class="member"><%=rs("Promotion")%></td> </tr> <% rcount=rcount+1 rs.movenext loop %> <tr> <td colspan="5" bgcolor="#E8E8E8" class="td_gray4" style="text-align:left;border-right: 1px solid #CCCCCC;"><span class="index"> <% if pgNO>0 then for i=1 to rs.pagecount if i=cint(pgNO ) then response.Write "<font class=m>[ </font><font class=index>"&i&" </font><font class=m>]</font> " else response.Write(" <a href=WEBBORD.asp?page="&i&" class=index><b>"&i&"</b></a> ") end if next end if end if end if %>
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง