Skip to content

Instantly share code, notes, and snippets.

View JoshyFrancis's full-sized avatar
🏠
Working from home

Joshy Francis JoshyFrancis

🏠
Working from home
15 followers · 2 following
View GitHub Profile
@wqweto
wqweto / Form1.frm
Created January 27, 2021 09:59
Large string array
Option Explicit
Private Sub Form_Load()
Const STR_NAMES1 As String = "|Thousand|Million|Billion|Trillion|Quadrillion|Quintillion|Sextillion|Septillion|Octillion|Nonillion|Decillion|Undecillion|Duodecillion|Tredecillion|Quattuordecillion|Quindecillion|Sexdecillion|Septendecillion|Octodecillion|Novemdecillion|Vigintillion|Unvigintillion|Duovigintillion|Trevigintillion|Quattuorvigintillion|Quinvigintillion|Sexvigintillion|Septenvigintillion|Octovigintillion|Novemvigintillion|Trigintillion|Untrigintillion|Duotrigintillion|Tretrigintillion|Quattuortrigintillion|Quintrigintillion|Sextrigintillion|Septtrigintillion|Octotrigintillion|Novemtrigintillion|Quadragintillion|Unquadragintillion|Duoquadragintillion|Trequadragintillion|Quattuorquadragintillion|Quinquadragintillion|Sexquadragintillion|Septquadragintillion|Octoquadragintillion|Novemquadragintillion|Quinquagintillion|Unquinquagintillion|Duoquinquagintillion|Trequinquagintillion|Quattuorquinquagintillion" & _
"|Quinquinquagint
@wqweto
wqweto / Form1.frm
Last active November 18, 2022 08:59
CRC32 calculation benchmark
Option Explicit
Private Declare Function QueryPerformanceCounter Lib "kernel32" (lpPerformanceCount As Currency) As Long
Private Declare Function QueryPerformanceFrequency Lib "kernel32" (lpFrequency As Currency) As Long
Private Declare Function RtlComputeCrc32 Lib "ntdll" (ByVal dwInitial As Long, pData As Any, ByVal iLen As Long) As Long
Private Sub Form_Click()
Const ITERS As Long = 100000
Dim baBuffer() As Byte
Dim lIdx As Long
@enepomnyaschih
enepomnyaschih / base64.js
Last active April 25, 2025 08:01
https://www.npmjs.com/package/byte-base64 - Encode JS Uint8Array, simple array of bytes or native JS string to base64 and back
/*
MIT License
Copyright (c) 2020 Egor Nepomnyaschih
Permission is hereby granted, free of charge, to any person obtaining a copy
of this software and associated documentation files (the "Software"), to deal
in the Software without restriction, including without limitation the rights
to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
copies of the Software, and to permit persons to whom the Software is
@wqweto
wqweto / mdPostFile.bas
Created May 5, 2019 10:23
Send JSON and binary file as multipart request
Option Explicit
Private Function pvPostFile(sUrl As String, sJSON As String, sFileName As String, Optional ByVal bAsync As Boolean) As String
Const STR_BOUNDARY As String = "864d391d-4097-44e0-92e1-71aff17094c1"
Dim nFile As Integer
Dim baBuffer() As Byte
Dim sPostData As String
'--- read file
nFile = FreeFile
@wqweto
wqweto / cPrintersCombo.cls
Last active June 3, 2024 16:07
Based on [Retrieving icons of current user printers](https://stackoverflow.com/a/1183185/40691)
VERSION 1.0 CLASS
BEGIN
MultiUse = -1 'True
Persistable = 0 'NotPersistable
DataBindingBehavior = 0 'vbNone
DataSourceBehavior = 0 'vbNone
MTSTransactionMode = 0 'NotAnMTSObject
END
Attribute VB_Name = "cPrintersCombo"
Attribute VB_GlobalNameSpace = False
@oleteacher
oleteacher / curl_progress.php
Last active February 6, 2021 23:30 — forked from stuudmuffin/curl_progress.php
PHP/cURL File Download with Progress Bar #curl
<?php
//output buffer
ob_start();
//create javascript progress bar
echo '<html><head>
<script type="text/javascript">
function updateProgress(percentage) {
document.getElementById(\'progress\').value = percentage;
}
@paresy
paresy / gist:3cbd4c6a469511ac7479aa0e7c42fea7
Last active December 21, 2022 01:43
PHP Embed Example
#include <stdio.h>
#include <iostream>
#include <thread>
#include <list>
#include <sapi/embed/php_embed.h>
int main(int argc, char* argv[]) {
int threadCount = 5;
@anggadarkprince
anggadarkprince / AppHelper.java
Last active May 2, 2023 22:39
Upload file with Multipart Request Volley Android
import android.graphics.Bitmap;
import android.graphics.drawable.BitmapDrawable;
import android.graphics.drawable.Drawable;
import java.io.ByteArrayOutputStream;
/**
* Sketch Project Studio
* Created by Angga on 12/04/2016 14.27.
*/
public class AppHelper {
@wqweto
wqweto / mdExcel.bas
Last active November 5, 2020 18:26
Write to Excel using ADO
Option Explicit
Public Function ReadFromExcel( _
ByVal sFileName As String, _
Optional Workbook As String, _
Optional ByVal CsvHeader As Boolean) As Recordset
Dim cn As ADODB.Connection
Dim rsDest As Recordset
Dim sTable As String
Dim sCharset As String
@paresy
paresy / crash.cpp
Last active November 26, 2020 04:13
PHP 7.3 ZTS Embed Example
#include <iostream>
#include <thread>
#include <main/php.h>
#include <main/SAPI.h>
#include <main/php_main.h>
#if defined(ZTS)
ZEND_TSRMLS_CACHE_EXTERN();
#endif