Help for this page

Select Code to Download


  1. or download this
    use Northwind
    
    ...
    
    select @c = count(*) from Orders where ShippedDate > @d - 365*6
    print @c
    
  2. or download this
    print "=== processing $server server ===\n";
    
    ...
    $sth->finish();
    
    $dbh->disconnect();
    
  3. or download this
    C:\Data\Scripts\sql>tsql_test.pl
    === processing new-borg server ===
    DBD::ODBC::st fetchrow_array failed: (DBD: no select statement current
    +ly executing err=-1) at C:\Data\Scripts\sql\tsql_test.pl line 44.
    
    C:\Data\Scripts\sql>