BitBlt

I'm eating home-made beef stew. Definitely worth the effort. Two lbs stew meat, 1 head of celery topped and sliced, 5 carrots sliced, 5 good-sized potatoes cubed to 1 inch, 1/2 a yellow onion diced, 1 tbsp parsley, 1 tsp salt, 1 tsp black pepper, 7 bay leaves, 1/4 tsp …

"It is the responsibility of every citizen to question authority." -- Benjamin Franklin

"It Might Get Loud" "The Little Mermaid" "Star Wars (A New Hope)" "Spirited Away" I have a daughter and a son. Guess which movie I watched with which kid? :-)

Personally, I cut over to Linux Mint several years ago. When WinXP support sunsetted, I didn't have the cash to get a new machine to run Win7, and I thought my old Dell Dimension (maxed out at 2Gb of memory) still had some life. So I just took a deep …

I'm assuming that you have this code in the Form_Load event? If so, you can't use SetFocus until the form itself is visible (Reference: [Microsoft VB6 Documentation](https://msdn.microsoft.com/en-us/library/aa244175(v=vs.60).aspx)). One method to work around this is use a "sub Main" to show your form, then set all the relevant stuff afterward. So, …

Please note that the asterisk wildcard character should be used for MSAccess SQL. The percent sign, as in @JxMan's example, is the wildcard character for MS SQL Server. There are other wildcard characters that are used for different purposes. You can find a full list of them in the MSAccess …

You are very close. The last dynamic query returns SQL statements, not results, like so: Line 1: SELECT ISNULL(SUM(amount),0) AS a FROM table1 Line 2: SELECT ISNULL(SUM(amount),0) AS a FROM table2 Even if you execute them, it doesn't quite give you what you need. You need to also UNION them …

This error usually occurs when you are referencing an identifier that has no context within your query. So, for instance, if you say select myTable.myCol1, MissingTable.myCol2 from myTable it will give you the same error..."MissingTable" has no context...it doesn't appear in the "FROM" clause. If you want to update one …

Your best bet is to store each of the sets in a single string, then use the "SPLIT" function in VB6 to parse the sets into a series of one-dimensional arrays, then iterate through the arrays. Here's a crude example to get you started. You might have to play with …

Sad news. RIP, Ancient Dragon.

If you know what the filename is for the old file, you can just use a FileSystemObject like so: Dim fs set fs = CreateObject("Scripting.FileSystemObject") ' ' do whatever you need to here using the FileSystemObject methods ' set fs = Nothing and rename the file, then save the new …

Granted. Everyone is dead. Very peaceful. (ewww...even I think that's icky) I wish I had an independent income of $100,000 US per year.

I actually wasn't able to get your second function to compile, but I tweaked it a tiny bit. Final result looked like this: (renamed the function so it wouldn't stomp on anyone's original) create FUNCTION [dbo].[StockNumbers2] () RETURNS @SequenceNumbersOfShares TABLE (StockNumber BIGINT) AS BEGIN DECLARE @MIN BIGINT DECLARE @MAX BIGINT …

Well done, and congratulations!

Look at the "Substring" function in the documentation. Use a "where" clause that specifies to return all rows where the first 6 positions of user = 'ZZZQQQ' and then update user = substring(user from 7).

At the risk of reviving a stale thread... It looks like you aren't including a "FROM" clause. You have a bunch of joins but never include the anchor table. I reformatted your code and included a comment that might make it clearer: SELECT TOP (1) CONVERT(varchar, tmpRptAssetEvent.EventTimeStamp, 120) AS 'DateTime', …

At the risk of reviving a stale thread... Since we can't see your data division, it's kind of tough to tell what's wrong. However, your logic says that if the value in EMPL_GNDR = 'M' then do something...otherwise tally the record as 'FEMALE'. So that means if there's garbage in …

Does "lbl1" refer to a Label control on a form? If so, you should be setting "lbl1.Caption" instead of "lbl1.Text" equal to your value. If this is not the case, we need more information about your application before we can provide guidance.

First a little background...when the SQL Server services get installed, they have to have a security context that has sufficient permissions on the local server to do what it needs to do. Usually the person doing the installation has local administrator permissions on the server, but it is usually NOT …

Where is the object "conn" set? Are you supposed to be using Module1 as your ADODB connection? If so, then you need to specify that in your recordset open statement.

I believe in moderation in everything. Including moderation.

You can do highlighting by setting the CellBackColor property for each cell in the row. Here's a little code snippet that will steer you in the right direction: Me.MSHFlexGrid1.Row = 10 For j = 0 To Me.MSHFlexGrid1.Cols - 1 Me.MSHFlexGrid1.Col = j Me.MSHFlexGrid1.CellBackColor = vbGreen Next j Hope that helps! …

This might work. I didn't get a chance to test it on mySQL but it uses ANSI standard SQL and it works in MSSQL just fine...you might have to tweak it because of the square brackets in the name since "user" is a reserved word in MSSQL. update a set …

For me, not so simple to explain. First some background: I used to do some Win32 graphics programming. One of the methods used in animating is heavily using a technique called a Bit Block Transfer. Basically, you reserve an area in memory, do some manipulations like setting pixel properties, then …

Interesting little problem. I was able to get a result set that I think is what you're looking for, but it shows all the detail lines. It does, however demonstrate the technique, so I hope you can use it as a starting point for further refinement depending on your needs. …

When you create your expirationdate string from the values from combo2, combo3 and combo4, it comes out with no formatting. The default value returned by the datepicker is a formatted date. Here's a little code snippet that you can use to demonstrate this: Debug.Print "Datepicker: " & datepicker Debug.Print "expirationdate: …

Guitar (electric, acoustic, classical), baroque recorder, harmonica

Apple -- Arrogant Person Produced Legendary Effects Microsoft