2016-10-20 2 views
0

DAO db, Access 2013에서 msoFileDialogSaveAs 응용 프로그램의 이미지 설정 줄에 컴파일 구문 오류가 발생합니다. 나는 jpg 파일을 저장하는 방법에 대한 코드를 가장 잘 추측하고있다. 포럼 및 MS 개발자/지원 DB 전반에 대한 연구를 마친 후 실험을 해본 결과 이것이 가장 가까운 해결책입니다. 최종 사용자가 내부 액세스에서 jpg 파일을 시스템에 저장할 수 있지만 db 자체는 저장하지 못하게하는 방법에 대한 아이디어는 무엇입니까? 이 시점에서 API를 사용하는 것은 불편합니다. 나는 토론에서 결론을 무엇Access 2013 msoFileDialogSaveAs 이미지 저장 안 함

Option Compare Database 
    Option Explicit 
    Dim FileLocation As String 
    Dim DiagFile As FileDialog 

    Private Sub Jpgbtn_Click() 
     Set DiagFile = Application.FileDialog(msoFileDialogSaveAs) 
     DiagFile.Title = "Save .jpg File As..." 
     DiagFile.InitialFileName = "*.jpg" 
     DiagFile.AllowMultiSelect = False 
     If DiagFile.Show Then 
      FileLocation = DiagFile.SelectedItems(1) 
      Set Image = CreateObject("*.jpg") 
     >>>>>Set Image = file.Item "*.jpg" 
      Image.SaveFile FileLocation 
     End If 
     MsgBox (" Jpg successfully saved. ") 
     globals.ActivityLog "Jpgbtn" 
    End Sub 
+0

'file.Item'은 무엇이며 어디에서 유래 되었습니까? – Andre

+0

@Andre, 그것은 jpg를 저장하는 코딩에 대한 나의 최고의 추측이었다. 그것은 인텔리 센스에 의해 옵션으로 제공되었지만 실패했습니다. 내가 시험해 본 어떤 것도 작동하지 않았기 때문에 포기하고 여기에서 시도했다. 객체를 참조해야한다는 것을 알았지 만 구문을 알지 못하고 파일을 나중에 열어 성공적으로 저장할 수 있습니다. 그게 내가 도움이 필요한 곳이야. – trappertam

+0

실제로 무엇을하려고합니까? 빈 .jpg 파일을 만들고 저장 하시겠습니까? 그게 무슨 말이야? 또는 저장할 이미지 데이터가 있습니까? 그거 어디서 났어? – Andre

답변

0

는 :

당신은 사용자가 자신의 바탕 화면 (또는 어디든지)에서 파일을 선택할 수 있도록하기 위해 msoFileDialogFilePicker 대화하지 msoFileDialogSaveAs을합니다.
How to show "Open File" Dialog in Access 2007 VBA?

고객 표 (예 : DLookup)에서 고객 폴더 경로 (서버 경로)를 읽습니다.

FileCopy을 사용하여 선택한 파일을 서버 경로에 복사하십시오.

모든 고객 파일이있는 테이블이있는 경우 Server Path\file name을 추가하십시오.

참고 : 당신은 정말 파일폴더의 차이를 볼 필요, 또는 모두가 혼란이다.

+0

답변 해 주셔서 감사합니다! 나는 그것을 해결하려고 노력할 것이고 그것이 어떻게 진행되는지 알려줄 것입니다.나는 정직하게 파일과 폴더 사이에 차이가 있다는 것을 몰랐다. 내가 말했듯이, Access에 새로운; 나에게, 지금까지, 그들은 같은 개념에 대한 동의어였다. 또한 파일 대 폴더의 차이점을 살펴볼 것입니다. 그 교육에 대해서도 감사합니다 :) – trappertam

+0

당신은 나를 조금 겁주고 있습니다. : o) - http://pc.net/helpcenter/answers/difference_between_files_and_folders – Andre

+0

이 작품은 아름답게 작동합니다! 교육에 대해 대단히 감사합니다. 파일과 폴더의 차이점을 전혀 모르고 언급 한대로 바로 찾았으며 향후 더 명확하게하기 위해 노력할 것입니다. 'DLookup'이 db를 너무 많이 감속시키기 때문에 실제로 'DLookup'대신 SQL 쿼리를 사용했습니다. 또한 모든 문서를 하나의 버튼으로 분리하는 대신 하나의 버튼으로 결합 할 수있었습니다. 더 작은 코드에 대한 예! 귀하의 도움으로 모든 것. 너는 축복이야! 다시 한 번 감사드립니다. – trappertam

관련 문제