vb6怎么写数据给sql server里面geometory类型的列

我有sql server 2008里面某个表格tbl的某列col是geometory类型的

现在无论我怎么定义我的adodb.parameter似乎都不对
VB code

    Dim para As ADODB.Parameter
    Set objCommand = New Command
    With objCommand

        Set para = .CreateParameter("@g", adPropVariant, adParamInput, , strSQLPara) '--怎么写似乎都不成
        .Parameters.Append para
        .ActiveConnection = g_objConnection
        .CommandType = adCmdText
        .CommandTimeout = m_lngTimeout
    End With

两种错误，一就是无法定义para。
Parameter object is improperly defined. Inconsistent or incomplete information was provided.

另一种就是定义成advariant这样可以定义para了但是excute的时候又有错误

有没有人经历过？怎么解决的？

谢谢

我是路过的............帮雅琪MM顶一下!