Sub Connect As ResumableSub
mysql.InitializeAsync("mysql", driver, jdbcUrl, UserName, Password)
Wait For MySQL_Ready (Success As Boolean)
If Success = False Then
Log("Check unfiltered logs for JDBC errors.")
End If
Log("Coneccion con el Servidor: " & Success)
Return Success
End Sub