GNU openVBS - VBScript,Reborn

# Clone the repository git clone https://github.com/yourusername/openvbs.git cd openvbs # Install dependencies (optional) pip install colorama # For enhanced CLI colors 

from openvbs import * # Clear any previous script clear_vbs() # Create variables define_variable("username", "John Doe") define_variable("age", 25) # Show a message message_prompt(f"Hello {username}!", title="Welcome") # Create a simple loop for_loop("i", 1, 5, 1, 'WScript.Echo "Count: " & i') # Execute the generated VBScript execute_vbs() 

from openvbs import * clear_vbs() # Create a log file create_file("system.log", "System started at: ") write_file("system.log", current_datetime(), append=True) # Read system information get_system_info() # Organize files by extension template_file_organizer() execute_vbs() 

from openvbs import * clear_vbs() # Read from registry registry_read("HKEY_LOCAL_MACHINE\\SOFTWARE\\Microsoft\\Windows\\CurrentVersion", "ProductName") # Get environment variables define_variable("user_profile", "") user_profile = get_env_var("USERPROFILE") # Run a system command shell_execute("notepad.exe", wait_on_return=False) execute_vbs() 

define_variable("name", "value") # Create a variable const_variable("PI", 3.14159) # Create a constant define_array("numbers", [1, 2, 3, 4]) # Create an array 

# Conditional statements if_else("x > 10", "WScript.Echo 'Large'", "WScript.Echo 'Small'") # Loops for_loop("i", 1, 10, 1, "WScript.Echo i") do_while("x < 100", "x = x + 1") # Select case select_case("userChoice", { 1: "WScript.Echo 'Option 1'", 2: "WScript.Echo 'Option 2'", "default": "WScript.Echo 'Invalid choice'" }) 

file_system_object() # Initialize file system create_file("data.txt", "Hello World") # Create file with content read_file("data.txt") # Read file content write_file("log.txt", "Entry", True) # Write/append to file delete_file("temp.txt") # Delete file folder_exists("C:\\MyFolder") # Check folder existence 

# Registry operations registry_read("HKCU\\Software\\MyApp", "Setting1") registry_write("HKCU\\Software\\MyApp", "Setting1", "NewValue") # Environment variables get_env_var("USERNAME") set_env_var("MY_VAR", "MyValue") # Shell commands shell_execute("dir", window_style=1, wait_on_return=True) run_program("C:\\Program Files\\MyApp\\app.exe", "/silent") 

# HTTP requests http_get("https://api.example.com/data") http_post("https://api.example.com/submit", "data=value") download_file("https://example.com/file.zip", "C:\\Downloads\\file.zip") # Email send_email("user@example.com", "Subject", "Message body", "smtp.server.com") 

# Export current script as a module export("my_utilities.vbs") # Import a module into current script get("my_utilities.vbs") # Clear all saved modules clear_modules() 

# Save settings set_setting("default_path", "C:\\MyApp") set_setting("auto_backup", True) # Load settings path = get_setting("default_path", "C:\\Default") backup_enabled = get_setting("auto_backup", False) 

# Debug output debug_print("Variable x = " + str(x)) # Log to file log_to_file("Process started", "app.log") # Performance timing start_timer("processing") # ... your code here ... end_timer("processing") # Assertions assert_condition("x > 0", "X must be positive") 

# Try-catch style error handling error_handling( try_block="risky_operation()", catch_block="WScript.Echo 'Operation failed: ' & Err.Description" ) # Traditional VBS error handling on_error_resume_next() # ... code that might fail ... on_error_goto_zero() 

openvbs/ ├── openvbs/ │ ├── __init__.py # Main imports and exports │ ├── main.py # Core functions and language features │ ├── runner.py # VBScript execution engine ├── files/ │ ├── windows/ │ │ └── output.vbs # Generated VBScript output │ ├── compiled_output/ # Packaged executables │ ├── modules/ # Saved script modules ├── src/ │ └── examples/ # Example scripts ├── tests/ # Unit tests └── LICENSE # License file 

pip install colorama # Enhanced terminal colors 

# Clone your fork git clone https://github.com/yourusername/openvbs.git cd openvbs # Create virtual environment python -m venv venv source venv/bin/activate # On Windows: venv\Scripts\activate # Install development dependencies pip install -r requirements-dev.txt # Run tests python -m pytest tests/ 

from openvbs import * clear_vbs() comment("System Information Gatherer") # Get computer name get_env_var("COMPUTERNAME") define_variable("computer_name", get_env_var("COMPUTERNAME")) # Get OS information get_os_info() # Get system specs get_system_info() # Save to file write_file("system_info.txt", "System Report Generated: ") write_file("system_info.txt", current_datetime(), append=True) execute_vbs() 

from openvbs import * clear_vbs() comment("Automated Backup Script") # Define source and destination define_variable("source_folder", "C:\\Important Files") define_variable("backup_folder", "D:\\Backups") # Create backup folder with timestamp define_variable("timestamp", "") current_datetime() # Format: YYYY-MM-DD_HH-MM-SS string_replace(current_datetime(), "/", "-") string_replace(current_datetime(), ":", "-") string_replace(current_datetime(), " ", "_") # Copy files shell_execute('xcopy "' + source_folder + '" "' + backup_folder + '\\Backup_' + timestamp + '\\" /E /I /Y') message_prompt("Backup completed successfully!", title="Backup Status") execute_vbs() 

from openvbs import * clear_vbs() comment("Network Connectivity Monitor") # Test multiple servers servers = ["google.com", "github.com", "stackoverflow.com"] for server in servers: define_variable(f"result_{server.replace('.', '_')}", "") shell_execute(f'ping -n 1 {server} > nul') if_else( "Err.Number = 0", f'WScript.Echo "{server}: Online"', f'WScript.Echo "{server}: Offline"' ) # Log results log_to_file("Network check completed", "network_monitor.log") execute_vbs()