Recent content by bjreb

Ok. I have a form that collects a display name from a list and a folder from the file dialog. These are passed as open arguments to this form whos recordset is set upon loading. Private Sub Form_Load() Dim dbs As DAO.Database Dim qrf As DAO.QueryDef Dim rs As DAO.Recordset Dim sDisplay As...

I have a form base on a recordset that is created at runtime when the form loads. Part of the string includes some open arguments. One of them is a folder path. The final string should be C\foldername\picturename The first part is the static path name ex(C\folder one). The second half is a...

Hello all- Here is my situation. I have written code to take emailed images and information into a back end sqlserver db. This is automated code that runs every hour on the hour so I don't have to worry about forgetting to run it. Most of the users play nice and just send in jpegs. Some want...

I have a database that is old, I use it for a lot of different things including running quick reports and queries that just get lost in the shuffle. I would like to clean the old stuff out but dread having to go through every single one. Is there a way in VBA to scan the objects to see if...

Time Card Querys Hello all. I am having an issue using a simple Punch card table. The fields are PK Customer Worker Time Punchcode The data is entered into the table by the employee in the field who are required to log in and log out of accounts they work in. What is happening is some...

Hi All- I have a form where the user enters a string into a text box. The string may contain apostrophes, quote marks and other punctuation. I then insert it into a larger SQL string to insert it into a table. It works fine when there is no punctuation, but add a quote or an apostrophe and...

Here is my code For iCounter = 1 To iStr iLen = Asc(Mid(sstring, iCounter, 1)) Select Case iLen Case Is = 32 Case Is < 48 sLetter = Chr(iLen) swawa = Replace(swawa, sLetter, "") iStr = iStr - 1 Case Is > 57...

I have a bit of code that I use to weed out letters in a string. The String must be all numbers and spaces but sometimes a letter sneaks in. Right now I just iterate the string character by character using the ascii equivalent. If it comes across a letter it closes and reports an error. Is...

I have images saved on a sql server. I have a stored procedure that creates a recordset in access. I have no idea of how to get the image field from server into a field in the recordset. I don't want to use a linked table, IT says no linked tables. Please help Thanks Andy

At the moment the code is just opening the form Frm_Change_cases. The only code on the form is an openargs to populate a textbox. I tried using a message box on the parent form but it would blank out the form when the box was closed

When I run this code the form becomes blank after the form Frm_Change_cases is closed. Private Sub CsQty_LostFocus() Dim iResult As Integer If iCaseHold = Me.CsQty.Value Then Exit Sub Else DoCmd.OpenForm "Frm_Change_cases", acNormal, , , , acDialog, Me.CsQty.Value End If End Sub Any Ideas...

I need to update a field in a local table with an image from a SqlServer backend. I use a stored procedure to select the image, I then put it into a recordset and try to insert into the proper record. When I try I get a 3342 error "Invalid Memo, OLE, or Hyperlink Object in subquery "Image"...

I have an insert into query based on a recordset from a stored procedure. The recordset contains a field that has a uniqueidentifier. How can I insert this into my table. It just does not want to work. Insert into [Copy Of CurrentData](TXT_JPEG_KEY) Values...

I know you can change the color of the listview font but is there anyway to change the font size and style? Thanks

At the moment I am just using msgbox me.txtbox