请问怎么插入图片信息？？？

Question

唉，网上找了个，却不能明白其中的存储过程该咋来做！！！
帮忙地人啊，你出来吧！！！
__________________________________________________________________
Dim intImageSize As Int64
     Dim strImageType As String
     Dim ImageStream As Stream    ' Gets the Size of the Image
    intImageSize = PersonImage.PostedFile.ContentLength    ' Gets the Image Type
    strImageType = PersonImage.PostedFile.ContentType    ' Reads the Image
    ImageStream = PersonImage.PostedFile.InputStream    Dim ImageContent(intImageSize) As Byte
    Dim intStatus As Integer
    intStatus = ImageStream.Read(ImageContent, 0, intImageSize)    ' Create Instance of Connection and Command Object
    Dim myConnection As New SqlConnection(ConfigurationSettings.AppSettings("ConnectionString"))
    '存储过程"sp_person_isp"
    Dim myCommand As New SqlCommand("sp_person_isp", myConnection)    ' Mark the Command as a SPROC
    myCommand.CommandType = CommandType.StoredProcedure    ' Add Parameters to SPROC
    Dim prmPersonImage As New SqlParameter("@PersonImage", SqlDbType.Image)
    prmPersonImage.Value = ImageContent
    myCommand.Parameters.Add(prmPersonImage)    Dim prmPersonImageType As New SqlParameter("@PersonImageType", SqlDbType.VarChar, 255)
    prmPersonImageType.Value = strImageType
    myCommand.Parameters.Add(prmPersonImageType)    Try
        myConnection.Open()
        myCommand.ExecuteNonQuery()
        myConnection.Close()
        Response.Write("New person successfully added!")
    Catch SQLexc As SqlException
        Response.Write("Insert Failed. Error Details are: " & SQLexc.ToString())
    End Try