vba - Access SQL Enter Parameter Value when trying to export to excel -


i trying run sql statement , export result excel spread sheet. i've looked through the internet , found this, seemed work other users.

it runs asks me "enter parameter value" linking "selecteduser" on line 4 of code, message box shows @ point code starts here: docmd.transferspreadsheet. if click ok excel sheet created nothing in except titles selected columns tables in database. if put valid data text box , press ok, excel spreadsheet created correct data showing.

i know selected data in combobox been stored, because if message box shows selected data combobox.

any ideas anyone? it's obvious data isn't been passed through somewhere, can't see where. 

private sub command12_click() dim strsql string dim strqry string dim selecteduser string dim db dao.database dim qdf querydef  selecteduser = me.combo6.column(0)  strsql = "select tblpra.prano, tblfolder.folder, tblfolder.fulltitle tblpra inner join (tblfolder inner join tblrelationship on tblfolder.folderid = tblrelationship.folderid) on tblpra.praid = tblrelationship.praid (((tblpra.prano)=selecteduser));" strqry = "tempuser"  set db = currentdb set qdf = db.createquerydef(strqry, strsql)  on error resume next docmd.deleteobject acquery, "strqry"  docmd.transferspreadsheet acexport, acspreadsheettypeexcel8, _ strqry, "c:\users\prc93\desktop\test.xls", true  docmd.deleteobject acquery, strqry  end sub

the selecteduser in query needs outside of quotes. string needs in single quotes 'selecteduser'. if msgbox query , should see selecteduser equals column (0). sure selecteduser needs string , not number e.g. long?

private sub command12_click() dim strsql string dim strqry string dim selecteduser string dim db dao.database dim qdf querydef  selecteduser = me.combo6.column(0)  strsql = "select tblpra.prano, tblfolder.folder, tblfolder.fulltitle " &_           "tblpra inner join (tblfolder inner join tblrelationship on " &_          "tblfolder.folderid = tblrelationship.folderid) on " &_          "tblpra.praid = tblrelationship.praid " &_          "where (((tblpra.prano)='" & selecteduser & "'));" strqry = "tempuser"  set db = currentdb set qdf = db.createquerydef(strqry, strsql)  on error resume next docmd.deleteobject acquery, "strqry"  docmd.transferspreadsheet acexport, acspreadsheettypeexcel8, _ strqry, "c:\users\prc93\desktop\test.xls", true  docmd.deleteobject acquery, strqry  end sub

Comments

Post a Comment

Popular posts from this blog

php - Wordpress website dashboard page or post editor content is not showing but front end data is showing properly -

Image
recently have uploaded wordpress site onto server. have uploaded wordpress site in sub-folder under root folder ../root(domain root folder)/wordpress (where host wordpress folder). now problem content data in page or post in dashboard of wordpress admin panel not showing - see image. but data showing in front view - see image. if not browser cache issue , not issue happened tinymce editor during upgrade; try add config file: define('concatenate_scripts', false);
Read more

How to get the ip address of VM and use it to configure SSH connection dynamically in Ansible -

i trying ip address of vm , trying use establish ssh vm. following script: --- - hosts: localhost become: yes connection: local gather_facts: false serial: 1 vars_files: - createvmvars.yml tasks: - name: gathering vm info. vsphere_guest: vcenter_hostname: "{{vcenter_hostname}}" username: "{{vcenter_username}}" password: "{{vcenter_password}}" guest: "{{guest_name}}" vmware_guest_facts: yes register: var - debug: msg="{{var.ansible_facts.hw_eth0.ipaddresses[0]}}" - name: establishing ssh connection. script: /home/shasha/devops/scripts/ssh_configure.sh "{{var.ansible_facts.hw_eth0.ipaddresses[0]}}" following content of ssh_configure.sh : #!/bin/sh ssh-keygen -t rsa ssh-copy-id $1 but when running playbook, getting following error while executing third task: error! 'var' undefined but debug module(second task) printin
Read more

javascript - Get parameter of GET request -

i make request: createxhrrequest( "get", fileurl, function( err, response ) { if( err ) { alert( "error get!" ); } alert(response); }); and full response: { "status" : "ok", "message" : "jvberi0xljqkjdduxdgkmy how can jvberi0xlj ? i try response.message , response["message"]. nothing works. just simple access this: var json = json.parse(response); json.message
Read more