Search:

One of the most weird ADO connection string I've seen recently. SQLNCLI is SQL Server Native Client 9.0 OLEDB provider for MSSQL 2005 and here are some sample strings i.e. very logically using...

Btw, it's a one time edit in your .vbp file. (You don't have to "remember" about it once it's edited.)

cheers,
</wqw>

You don't need an add-in for this if you are willing to one time manually edit your .vbp file and copy/paste these two lines of undocumented LinkSwitches.

cheers,
</wqw>

Deliberately does not use any API calls so is not the sharpest tool in the shed


'--- mdSHA2.bas
Option Explicit
DefObj A-Z

Private PowerOf2(0 To 31) As Long

Private Function...

Works on WinXP

cheers,
</wqw>

Btw, here is a byte-arrays pure VB6 implementation based on your class but reduced to about 175 LOC by removing mostly unnecessary cruft:


'--- mdSHA256.bas
'--- Based on clsSHA256 by Phil...

Well, you can use .NET implementation of SHA-2 like this


Private Sub Form_Click()
Dim baInput() As Byte
Dim baHash() As Byte

baInput =...

For instance try putting these helper functions in a module


'--- Module1.bas
Option Explicit

Private Declare Function CryptAcquireContext Lib "advapi32" Alias "CryptAcquireContextW" (phProv...

First, you have to learn how to work with byte-arrays in crypto. Your "238dbd3bd53ee4c53c505ca2b56e1756e622aa0c" is a *string* literal -- so called hex dump of a byte-array. You need helper functions...

So you executes both .exes on the same XP machine?

This looks like something is going on with the .exe certificate check or anti-virus check or .exe reputation check or .exe 'Zone.Id' alternative...

It was a certain Win 10 update which *revealed* the problem.

I mean the dormant issue must have been there all along but did not cause any issues with previous OS versions.

cheers,
</wqw>

Usually it's when you append to an dynamic array you just check size and resize if needed and then assign last element If lSize > UBound(arr) Then ReDim Preserve arr(0 To lSize * 2) End If :...

Try to follow this with


ReDim Preserve u(0 To 10) As MyUdt
u(0).i = 42

Second line assignment fails with resized UDT arrays but works ok with arrays of scalar (primitive) types.

cheers,...

Tweak the SafeArrayAllocDescriptor API declare and can be used without wrapping the SA pointer into a Variant like this


Option Explicit

Private Declare Function SafeArrayAllocDescriptor Lib...

This looks bad and metafiles stink.

(Keeping an eye on the thread.)

cheers,
</wqw>

Here is a direct link to PSC submission: ucScrollbar 1.0 (rv 4) by Carles P.V.

> VBForums has a newer version

You can post a link to it too.

cheers,
</wqw>

When you are downloading 100 files in order to add a progress indicator (% complete) of the overall download operation you have to know file sizes of each of these downloads so that you can compute...

Here is a cDownloader class which wraps WinHttpRequest object and can download asynchronously to a local file. Needs a project reference to Microsoft WinHTTP Services, version 5.1 to compile.

...

Mostly yes, unless you have RaiseEvent Click() in a routine in which case any error in the event handler(s) for your class/control Click event does not trap in your current error handler but the...

Do what every professional piece of code happens to do eventually -- instrument logging error handlers in each and every routine in each and every module of your application.

In production you...

I have couple of unasked advices for you:

1. Learn to separate data (so called model) from your UI (so called view)

In your case you have various lists control (List1, List4, etc.) which are...

You got him triggered now and how dare you not be interested in VFB -- the best chinese copycat of VB6 ever -- so the cannonade of illegible posts is going to thunder here a couple of days at least...

I can only advise you to start a new thread outside of CodeBank forum with a simplified version your failing send mail under Win7.

Post a full working code which has trouble with CDO under Win7 in...

Wait. . . Is EMF+ compatible with GDI and/or IPicture?

I though that EMR_ALPHABLEND is just the macro/playback record for AlphaBlend API function call as recorded by the capturing DC.

So it...

Now that would be hilarious. . . Really?!

cheers,
</wqw>

On the machine you have troubles start Internet Explorer (not Edge) and navigate to https://www.howsmyssl.com/ and notice info under Version section.

It says TLS 1.2 here but I have Service Pack 1...

CDO and IE use Schannel library for TLS and you can configure default Schannel protocols/ciphers through registry so an app using default settings can be forced to use or not to use TLS 1.2 for...

It says "Standard EXE project" pretending to be an ActiveX EXE by sharing instances through OBJREF monikers i.e. without registering class factories in registry and ROT like an Ax-EXE does.
...

> not sure why people are not using it

This is a million $ question -- why in these forums only baka uses Direct2D and everyone else runs for GDI+ when loading PNGs or anything remotely graphical...

ByVal vs ByRef for reference types (As Object) has a completely different semantics than ByVal vs ByRef for value types (Long, Double, *String*, UDT, etc.) For reference types (a.k.a. pointers) the...

This is probably configuration problem with TLS version being supported by Schannel. Try to configure Win7 to support TLS 1.2 by default.

Note that you have to have Service Pack 1 for Win7...

> And lets be real here, do we really want to start manually padding our structures just to get Len to work?

Been there done that. Now I realize that this was only to *force* Len to return correct...

You probably saw what AlphaBlendImage does.

I'm begging every VB6 dev doing GDI+ please initialize GDI+ on demand but don't try to shut it down at all. Please!

It's 2022 and there is no need to...

No, I'm not working on any assignments by request in these forums.

Here is a direct link to the raw version of the source file:...

I just added cZipArchive.cls and pasted this code in Form1


Option Explicit

Private Sub Form_Click()
Const IDX_NAME As Long = 0
Const IDX_CRC32 As Long = 2
Dim lIdx ...

> But take care of something: use even character counts, not uneven.

Why is that? What's the problem with odd count and Len? Wrong padding?

Nevertheless it seems Len was evil back in olden...

Dilletante’s understanding corresponds to reality. Using pixels with controls/forms/images/icons positions and/or sizes shrinks the app interface when forms are repositioned to a high resolution...

It’s official: Len is the evil twin (not LenB)

For Per Monitor DPI awareness you'll have to use SetProcessDpiAwareness instead which is a Win8.1+ API so might need OERN.

This will most probably fix the single-pixel line getting blurry but will...

Frankly I’m sick and tired of both. Cannot remember but I think LenB was the evil twin esp. with byte-arrays.

With byte-arrays in UDT passing ByVal VarPtr(uData) prevents ANSI transcoding which...