VBScript

Generate a Random Firebase Push ID

See more Firebase Examples

Generates a random Firebase Push ID. (According to the algorithm described at https://gist.github.com/mikelehen/3596a30bd69384624c11, and at https://www.firebase.com/blog/2015-02-11-firebase-unique-identifiers.html) VBScript

Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)

' Demonstrates how to generate a random Firebase Push ID.

' This example requires the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.

set prng = CreateObject("Chilkat.Prng")

For i = 1 To 10
    pushId = prng.FirebasePushId()
    outFile.WriteLine(pushId)
Next

outFile.Close