…с помощью RunDll?

Нельзя.

rundll32.exe imagehlp.dll,CheckSumMappedFile imagehlp.dll

ни на что не ругается, значит точку входа находит, хотя ничего и не выводит. По крайней мере в консоль (cmd).

Но я бы предпочёл создать отдельную тему, т.к. не каждый человек заходит на тему не касающийся его языка программирования.

То есть? Не JScript, а VBScript — в этом смысле? Так ведь по приведённой в #2 ссылке как раз VBScript.

Тот код — тоже: Серый форум / VBScript , определение crc32 файла использует WinAPI для вычисления CRC32 содержимого файла, в Серый форум / HTA: вычисление CRC32 строки или файла ActiveX используется только для чтения содержимого файла (опять же, после обсуждения с коллегами [Серый форум / JScript: Двоичные файлы, #11], mozers, перейдя на «TextStream.Read()», полностью убрал зависимость от ADODB.Stream — та же ссылка из  #2).

Было бы неплохо, если бы Вы сравнили алгоритмы

Vbs алгоритма кажется не было...bober132 вероятно это имел ввиду. Был и идентичен вот. Не заметил.

Было бы неплохо, если бы Вы сравнили алгоритмы по второму методу (скриптовому), ибо я не смогу сим заняться. Что скажете?

P.S. Не помню где нашёл код, но он нам был на языке VB, а не VBS. Так что выкладываю без копирайта.

Dim CrcTableInit
Dim CRCTable(255)
 
MsgBox Hex(calcCRC32("GetProcAddress")) 'Пример Использования
Wscript.Quit


Function calcCRC32(TextStr)
    Dim i, crc
    If CrcTableInit = False Then Call Init_CRCTable
    crc = -1
    For i = 1 To Len(TextStr)
        crc = (((crc And &HFFFFFF00) \ &H100) And &HFFFFFF) Xor (CRCTable((crc And &HFF) Xor Asc(Mid(TextStr, i, 1))))
    Next
    crc = crc Xor &HFFFFFFFF
    calcCRC32 = crc
End Function
Sub Init_CRCTable()
    Dim i, j, Limit, crc
    Limit = &HEDB88320
    For i = 0 To 255
        crc = i
        For j = 0 To 7
            If crc And 1 Then
              crc = (((crc And &HFFFFFFFE) \ 2) And &H7FFFFFFF) Xor Limit
            Else
              crc = ((crc And &HFFFFFFFE) \ 2) And &H7FFFFFFF
            End If
        Next
        CRCTable(i) = crc
    Next
    CrcTableInit = True
End Sub