99資訊月首日(4日)下午會場「嬌點」迎來了日本寫真女星澤木律沙，身著泳裝挺 G 奶為隨身數位娛樂「大視界」活動站台。首度來台的她，對於台灣的資訊月活動的舉辦方式感到新奇，參觀者的熱烈反應也讓她相當驚喜，雖然今天台北氣溫略涼，但還是維持甜美笑容直說「大丈夫！」 

圖／文 文青心語 

獨家好康！和小豬羅志祥、曼哈頓女孩近距離接觸

一般來說，書上都會教大家使用DataSet來Fill資料進DataTable使用

使用控制項ListBox 加入 ListItem

一般來說我們使用控制項Listbox 需要加入值時，就直接打 Listbbox.items.add("whohow") 但這樣加入時，該筆item的text就是"whohow"，value也是"whohow" 如果我們需要將text跟value指定不同的值時，就需要用到ListItem這個控制項了 注意的是~每次加入ListItem到ListBox時，再加入下一筆，就需要再 "new" 一個ListItem 以下是程式碼

Dim dr As SqlDataReader '宣告一個SqlDataReader
        '要用以下的連線字串方法的話要 Imports System 跟 Imports System.Web.Configuration
        Using Conn As SqlConnection = New SqlConnection(WebConfigurationManager.ConnectionStrings("fantasy").ConnectionString.ToString)
            Dim cmd As SqlCommand = New SqlCommand("SELECT [C_Name], [Office_Email] FROM [D001]", Conn)
            Conn.Open()
            dr = cmd.ExecuteReader()
            While dr.Read()
                If (Trim(dr.Item("Office_Email"))) <> "" Then
                    Dim myitem As New ListItem
                    myitem.Text = Trim(dr.Item("c_name"))
                    myitem.Value = Trim(dr.Item("Office_Email"))
                    ListBox1.Items.Add(myitem)
                End If
            End While
        End Using

為了防止SQL Injection 在ASP.NET裡有提供一個機制 使用Parameters來防止惡意的 SQL Injection 以下程式碼將示範如何使用Parameters的add三種方法 來指定「@欄位名稱」的對應值

Private Sub UpdateDemographics(ByVal customerID As Integer, _
    ByVal demoXml As String, _
    ByVal connectionString As String)

    ' Update the demographics for a store, which is stored
    ' in an xml column.
    Dim commandText As String = _
     "UPDATE Sales.Store SET Demographics = @demographics " _
     & "WHERE CustomerID = @ID;"

    Using connection As New SqlConnection(connectionString)
        Dim command As New SqlCommand(commandText, connection)

        ' Add CustomerID parameter for WHERE clause.
        command.Parameters.Add("@ID", SqlDbType.Int)
        command.Parameters("@ID").Value = customerID

        ' Use AddWithValue to assign Demographics.
        ' SQL Server will implicitly convert strings into XML.
        command.Parameters.AddWithValue("@demographics", demoXml)

        Try
            connection.Open()
            Dim rowsAffected As Integer = command.ExecuteNonQuery()
            Console.WriteLine("RowsAffected: {0}", rowsAffected)

        Catch ex As Exception
            Console.WriteLine(ex.Message)
        End Try
    End Using
End Sub

紀錄一下，免得之後都要再查一次 以下是我的寫法

 
$("#myimg").hide();
$("#myimg").show();

這裡還有提到一點就是

為了不讓人看到網站的內容

這裡提供JavaScript鎖右鍵的方法