Conn = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb") sql ="update tbl_test set view=view+1 where wid='4' " Set rs=Server.CreateObject("ADODB.recordset") rs.open sql,Conn,1,3
<% Conn = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb") sql ="select * from tbl_test" Set rs=Server.CreateObject("ADODB.recordset") rs.open sql,Conn,1,3 n=1 While Not rs.EOF And n<10 %> <img src="../<%=rs("Picture")%>" ><br> <%=rs("Bcount")%> <% n=n+1 rs.moveNext Wend %>
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง