Search results

oh well never mind...lets just wait and see whats said! off to a meeting now..might not b back!:rolleyes: hopefuly ill get an extention though, enough time to work this out!

' set it up to print only the currant record! Dim strDocName As String Dim strFilter As String strDocName = "MethPrescriptionPrint" strFilter = "Ref: = Forms!Methadone_Script!Ref:" DoCmd.OpenReport strDocName, acViewNormal, , strFilter Exit_Command134_Click: Exit Sub...

Create a command button that prints the current record Open the form in Design view. Click Control Wizards in the toolbox if it's not already pressed in. In the toolbox, click Command Button . On the form, click where you want to place the command button. In the first wizard dialog box...

read something somewhere about the scope option and setting it to RECORD but cant find it

Private sub print() on error GoTo ErrTrap Dim currform as form Set currform = Screen.ActiveForm DoCmd.RunCmd acSaveRecord DoCmd.OpenReport "MethprescriptionPrint", acViewNormal,"","[Ref:]=[Forms]!["_& currform.Name & "]![Ref:]" Code_Exit: Exit Sub ErrTrap: MsgBox Error$ Resume Code_Exit End...

strDocName = "MethPrescriptionPrint" strFilter = "Ref: = Forms!Methadone_Script!Ref:" DoCmd.OpenReport strDocName, acViewNormal, , strFilter this doesnt work and i dont know why!

really freeking out now guy's, nothing i do seems to work, i have my ART one working great but this methadone one sucks! i saw this in someone elses post and tried it but had to take it out cos it didnt work for me! Private sub Print() on error GoTo ErrTrap Dim Currform as Form set Currform =...

Hi guys me again:rolleyes: my methadone script needs to work by 2mo and i cant seem to get it working dispite all me posts on it! i need it to print out ONLY the currant record. i need it to print the script twice. one copy with a date on it and the other copy without a date. i need it to...

thanx..... i have been working on it and managed to solve it! i opened the db and got the error message and it asked if i wanted to repair it so i said yes and put the access disc in and then i went into the db and added the level of user and their permissions again and its all ok...

oh no!:D whoops! right i thought ok so ill try some of this out on a test db for cds or something first just so i didnt fu** up the important one! well what i have done i really do not know! as it has set up secuirity for my db! too in fact for all db opened on my machine! i deleted all that...

thanks honey! u got my mail yet?

sounds good honey! i searched for security but didnt see anything except use the wizard bla bla bla.

i hate that bleepin wizard! thank god i backed up my db just before i ran it! it went all screwy on me! like everthing always does! i simply want to create user names and passwords for each user. i need to have 1 group(doctors without permission for electronic prescribing from the scottish...

cheers honey im fed up! nothing ever goes right for me! even when it should! TA luv ya! lyns x

exactly the same! i have this code in the print button on the form! but you can let me know a better way cos my preview doesnt work either!

nope i get a syntax error missing operator in qry expression "Ref: = forms!Methadone Script!Ref:"

25th honey! i think i can get you picked up too but not sure! i think i have solved another one of my problems too Dim strDocName As String Dim strFilter As String strDocName = "MethPrescriptionPrint" strFilter = "Ref: = forms!Methadone Script!Ref:" DoCmd.OpenReport...

Right i had a problem with my forms going all funny on me, e.g. not always maximising although i had the DoCmd.Maximize code in the on open and on load events. i found that Opening my form in Form view. Sizeing the form to the size i want by dragging the borders of the Form window to where i...

god as for a challenge! no im not going to go there if you had seen some of my posts challenge would not describe me! or my db questions, more like punishment or headache or pain or torture take your pick but challenge you havent seen the half of it and the worst bit is i really dont put it on...

:D gotta luv me! :D