<%@ Import Namespace ="System.Data.SqlClient" %> <script language ="vbscript" runat ="server" > Sub Page_Load() Dim conCustomers As SqlConnection Dim cmdCustomers As SqlCommand Dim dtrCustomers As SqlDataReader conCustomers = New SqlConnection("Data Source=.; Initial Catalog=Northwind; integrated security=true") conCustomers.Open() cmdCustomers = New SqlCommand("Select CompanyName from Customers", conCustomers) dtrCustomers = cmdCustomers.ExecuteReader() While dtrCustomers.Read() lblMessage.Text &= "<li>" lblMessage.Text &= dtrCustomers("CompanyName") End While dtrCustomers.Close() conCustomers.Close() End Sub </script> <html xmlns="http://www.w3.org/1999/xhtml" > <head id="Head1" runat="server"> <title>Database.aspx</title>/ </head> <body> <form id="form1" runat="server"> <div> <asp:Label ID="lblMessage" runat="server" Text="lblMessage" ></asp:Label></div> </form> </body> </html>
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง