이것은 .NET 프레임 워크 코드 인 것으로 보입니다. ByteImage = System.IO.File.ReadAllBytes ("C : \ my folder \ my file")에 VBA Access 2007에 동일한 코드가 있습니까?
.NET을 사용하지 않으므로 동일한 작업을 수행 할 VBA (Access 2007)에 동일한 코드가 있습니까? ?
이것은 .NET 프레임 워크 코드 인 것으로 보입니다. ByteImage = System.IO.File.ReadAllBytes ("C : \ my folder \ my file")에 VBA Access 2007에 동일한 코드가 있습니까?
.NET을 사용하지 않으므로 동일한 작업을 수행 할 VBA (Access 2007)에 동일한 코드가 있습니까? ?
아마도 :
''Reference: Microsoft ActiveX Data Objects x.x Library
Set mstream = New ADODB.Stream
mstream.Type = adTypeBinary
mstream.Open
mstream.LoadFromFile "c:\docs\image.jpg" 'FileNameToLoadWithFullPath
쉽게과 같이 레코드에이를 추가 할 수 있습니다
rs.AddNew
rs.Fields("ImageCol").Value = mstream.Read
rs.Update
Dim ByteImage() As Byte
Open "C:\my folder\my file" For Binary Access Read As #1
ReDim ByteImage(1 To LOF(1))
Get #1, , ByteImage
Close #1
어디 variablve의 mstream에 대한 선언입니까? –
이것은 스 니펫입니다. 새로운 ADODB.Stream을 참고하십시오. – Fionnuala
변수 선언없이 코드 스 니펫을 게시하는 것은 좋지 않습니다. rs도 두 가지 유형의 레코드 세트, ADO 또는 DAO 중 하나 일 수 있으므로 선언이 필요합니다. –