如何解决PDF文件到varbinarymax存储过程
我需要将PDF文件存储到varbinary（max），如何上传pdf文件。下面是存储过程的代码。 @vbin_Document enter image description here
Set objConnection = CreateObject("ADODB.Connection")
objConnection.Open ConnectionString_
Set cmd = CreateObject("ADODB.Command")
cmd.ActiveConnection = objConnection
cmd.CommandType = adCmdstoredProc
cmd.CommandText = "[Documents_Add]"
cmd.parameters.append cmd.createParameter("@str_NameByFacility",adVarChar,adParamInput,25,NameByFacility)
cmd.parameters.append cmd.createParameter("@str_ScanCode",70,ScanCode)
cmd.parameters.append cmd.createParameter("@vbin_Document",adVarBinary,-1,Document)
cmd.parameters.append cmd.createParameter("@str_DocumentType",100,DocumentType)
cmd.parameters.append cmd.createParameter("@str_NodeName",NodeName)
cmd.parameters.append cmd.createParameter("@str_ApplicationName",ApplicationName)
cmd.parameters.append cmd.createParameter("@str_UserName",UserName)
cmd.parameters.append cmd.createParameter("@bit_isDone",adInteger,adParamReturnValue)
cmd.parameters.append cmd.createParameter("@int_ErrorCode",adParamReturnValue)
cmd.parameters.append cmd.createParameter("@bint_ErrorID",adParamReturnValue)
cmd.execute
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 dio@foxmail.com 举报，一经查实，本站将立刻删除。
