ms access - VBA - Browsing, selecting file and saving file as -

-

i creating access database forms , reports. in 1 of forms want able go folder selecting file (.pdf, .doc, .xls) , saving in dedicated "attachments" folder.

i know ole objects , attachment functions, both of these saving attachments within database perse. trying stay away since imperative have readily access attachments , make database lighter.

i have been playing in vba 

application.filedialog(msofiledialogfilepicker)

and 

application.filedialog(msofiledialogsaveas)

this have far not working:

option compare database  private sub select_save_click()  call selectfile  end sub   public function selectfile() string      dim fd filedialog  dim file_name string  dim path string  path = "o:\foldername"  set fd = application.filedialog(msofiledialogfilepicker)  fd     .allowmultiselect = false     .title = "please select file save attachment"     if .show = true          file_name = dir(.selecteditems(1))          selectfile = .selecteditems(1)          new_name = path & file_name          .selecteditems.item(1).saveasfile new_name          me.attach_save = new_name       else         exit function     end if      set fd = nothing  end    end function

consider using filecopy .saveasfile method may not work inside fd object. plus, saveasfile method associated ms outlook vba using email attachments.

also, use dir() on string variable outside fd object , not on variant array .selecteditems(1) inside fd object.

finally, notice add final slash in path string.

dim fd filedialog dim file_name string dim path string  path = "o:\foldername\"  set fd = application.filedialog(msofiledialogfilepicker)  fd     .allowmultiselect = false     .title = "please select file save attachment"     if .show = true         selectfile = .selecteditems(1)     else         exit function             end if end  file_name = dir(selectfile)         filecopy selectfile, path_name & file_name  set fd = nothing

Comments

Post a Comment

Popular posts from this blog

python - How to create jsonb index using GIN on SQLAlchemy? -

-
here's current code creating index jsonb. index("mytable_data_idx_id_key", mytable.data['id'].astext, postgresql_using='gin') but got error. sqlalchemy.exc.programmingerror: (psycopg2.programmingerror) data type text has no default operator class access method "gin" hint: must specify operator class index or define default operator class data type. [sql: "create index event_data_idx_id_key on event using gin ((data ->> 'id'))"] is there way create index on sqlalchemy? the postgresql specific sqlalchemy docs @ http://docs.sqlalchemy.org/en/latest/dialects/postgresql.html#operator-classes mention postgresql_ops dictionary provide "operator class" used postgresql, , provide example illustrating use: index('my_index', my_table.c.id, my_table.c.data, postgresql_ops={ 'data': 'text_pattern_ops', ...
Read more

PHP DOM loadHTML() method unusual warning -

-
i had following code works fine on localhost: $document = new domdocument(); $document->loadhtml($p_result); $form = $document->getelementsbytagname('form')->item(0); // code continues using $form variable after same code updated on outside server, loadhtml() failed , issued warning. warning: domdocument::loadhtml() expects parameter 1 valid path, string given in path/name/to/script.php returned null instead of object code pretty gets fatal error. note contents of $p_result absolutely same on outside server , on localhost. but why displays kind of warning , why not work? doesn't loadhtml() expects argument 1 string in first place? why method expects parameter 1 valid path ? just make clear i'm not calling loadhtmlfile() , i'm calling loadhtml() . thanks. you're affected one of php bugs . issue present in php 5.6.8 , 5.6.9. have affected php version on server, , bug-free version on localhost. the bug forbids null ...
Read more

c# - TransactionScope not rolling back although no complete() is called -

-
i'm using transactionscope rollback transaction fail bool errorreported = false; action<importerrorlog> newerrorcallback = e => { errorreported = true; errorcallback(e); }; using (var transaction = new transactionscope()) { foreach (importtaskdefinition task in taskdefinition) { loader.load(streamfile, newerrorcallback, task.destinationtable, processingtaskid); } if (!errorreported) transaction.complete(); } i'm sure there no transactionscope started ahead or after code. i'm using entity framework insert in db. regardless state of errorreported transaction never rolled in case of error. what missing ? transactionscope sets transaction.current . that's does. wants transacted must @ property. i believe ef each time connection opened reason. probably, connection open when scope installed. open connection inside of scope or enlist manually. ef has nasty "design decision": default opens ...
Read more