Search results

LOL! I understand. They turned Domain Admin over to our IT Sect. and are now trying to eliminate as much human interaction as possible. Thanks for the help. Looks more VB/VBA friendly then what I had.

Hi All - I am attempting to create a Recordset Connection to my Active Directory. I want to be able to Create New Users, add them to groups and printers, and set their password from an Access DB. My connection is telling me that my Recordset doesn't accept new records. I tried to pass a...

Thanks so much Bob - went with the Call and it ran fine. Gemma - learned a long time ago - never name your Functions anything similar. :)

Hey Bob - I had tried that and got a compile error Expected: = which is why even though it looked so wrong, concatenating the comma took the error away. So I went with it. One argument pass works fine with either one - but both and it's jacking up my code. Do you know why it might be...

I have checked the boards - but nothing quite like mine and I am stuck. Any help is much appreciated! :) This is happening on a Function call that accepts two arguments. Call from the VBA Form to Function - (it's the SendEmail) If MsgBox("Is this correct? " & vbNewLine & MyRequest...

Thanks! I do believe we are going to modify this DB to actually automate the population of AD and add the users to the necessary groups. That site is very informational.

I have found a lot of code to query Active Directory for users and groups they belong to but I just need to query for two certain types of groups and don't care about the users: email. Users.PRT_ I am hoping to use the queries to populate two multi-select list boxes for an online Network...

Thanks Simon - I am going to give this a try!

I currently have a form that changes the InputMask at the form input level based on Type choice. Type A can allow characters Type B is numerics only I need it to be a little more sophisticated than that. If Type A then Me.Input.inputmask = xxxxxxxx Else...

Here is how I fixed it. Actually my boss' idea to change the InputMask on the Type definition. Sub TypeCB_AfterUpdate() If Me.TypeCB = "MHCNMID" Or Me.TypeCB = "MHCNOD" Or Me.TypeCB = "MHCNFR" Or Me.TypeCB = "MHCRMID" Or Me.TypeCB = "MHCROD" Or Me.TypeCB = "MHCRFR" Then...

Hey Steve - Yeah - that is way off. The only time we allow characters in a case number when logging EMR archiving is Contact Notes and Crisis - so it can have 2004C Any patient in this status in the year 2004 with the last name starting in C. The rest of the time its a 3-10 digit case number.

The longer I am alive - the more assured I am that my job is not as developer but as stupidity catcher. I think in the past 6 months I have written more code to stop the actual ability of one to be stupid as an end user than working on my fun projects. Here we go: I have a simple quick and...

I took it out of the VBA code and put it as a control source and it is working fine. On close, it closes the report and opened preview source. :rolleyes: Man - I hate when things are simple but they aren't.

No - I left it alone because I didn't know how to handle it. So you are saying adding a FormatCount will handle the displaying of the code onto a report? I actually tried to figure out how to have the EUs print their form - but most can't even tie their shoes. It's a situation where if it...

This is a one shot - print out what they submitted to QA - shut the window. But they need to be able to select their network printer and it needs to be date time stamped. Therefore a report would work great. So - you are right - this is not a flow/list of data - one shot/one record.

I have a Form that produces a scripted response in paragraph form. FROM POIPreview: Private Sub Form_Load() Dim MyStr As String Dim Q2 As String Dim Q3 As String Dim Q4 As String Me.tbFindings = MyID If DLookup("CH2", "Findings", "[FindingID] = " &...

I always come up with these off the wall things - so let this be no different... I have a preview screen that gets written by what is selected on a form Private Sub Form_Load() Dim MyStr As String Dim Q2 As String Dim Q3 As String Dim Q4 As String Me.tbFindings...

GHudson - I actually emailed Bob Larson this morning regarding your very code because I was wondering how much I actually needed. What could I strip out? He could not help as he used it for something different. The app I have built out is for a signature pad in VB.NET and using iTextSharp to...

Here is the code I used and it's great. If acroFiles.Length > 0 Then Dim newreader As String = acroFiles(0) 'DO NOT MOVE ON THE FLY Dim ps As Process = Process.Start(newreader, String.Format("/p ""{0}""", pdfFileToPrint)) 'DO NOT MOVE ON THE FLY ps.WaitForExit() Else MessageBox.Show("Could...

See - you just had to believe!