2010-07-29 3 views
0

이것은 .NET 프레임 워크 코드 인 것으로 보입니다. ByteImage = System.IO.File.ReadAllBytes ("C : \ my folder \ my file")에 VBA Access 2007에 동일한 코드가 있습니까?

.NET을 사용하지 않으므로 동일한 작업을 수행 할 VBA (Access 2007)에 동일한 코드가 있습니까? ?

답변

0

아마도 :

''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 
+0

어디 variablve의 mstream에 대한 선언입니까? –

+0

이것은 스 니펫입니다. 새로운 ADODB.Stream을 참고하십시오. – Fionnuala

+0

변수 선언없이 코드 스 니펫을 게시하는 것은 좋지 않습니다. rs도 두 가지 유형의 레코드 세트, ADO 또는 DAO 중 하나 일 수 있으므로 선언이 필요합니다. –

0
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 
관련 문제