 |
<% Dim myConne As New SqlConnection("data source=(local);initial catalog=hocal;user id=sa;pwd=8592133")
Dim strsql As String = "select * from create_first where flag='1'"
Dim myCommand As New SqlCommand(strsql, myConne)
myConne.Open()
Dim myreader As SqlDataReader
myreader = myCommand.ExecuteReader
Try
While myreader.Read()
Response.Write("| ︱ " & Trim(myreader.Item("content")) & " | ")
End While
myreader.Close()
myCommand.Cancel()
myreader = Nothing
myCommand = Nothing
Catch ex As Exception
End Try
%>
|
|
|
|
|