功能：将对象追加到集合中，如果集合是fields，可以先创建field对象然后再将其追加到集合中

  格式：1.collection.append object

                Collection:集合对象

               Object：对象变量，代表所要追加的对象

                例：

                      Dim objcmd as new command

                      Dim Parm as new Parameter

                ‘创建新的Parameter对象

                     Set Parm=objCmd.creadParameter(“用户名”,adVarChar,adParamInput,10)     

            ‘将Parm追加到Parameters集合中

                      Objcmd.Parameters.append Parm

2.fields.Appendname,type,definedsize,attrib

             Name:字符串，新field对象名称，不得与fields中的任何其它对象同名

             Type：新字段的数据类型，其默认值为adEmpty

             Definedsize：可选，指示新字段定义大小，默认definedsize未指定

             Attrib：可选，指定新字段属性，默认值adflddefault

              注：1.在调用fields.append方法前没设置cursorlocation属性，当使用open方法打开