projman/hlp/ru/snodbc_test.tcl
2015-10-19 14:27:31 +04:00

19 lines
391 B
Tcl

#!/usr/bin/tclsh
######################################################
# scripts
# Distributed under GNU Public License
# Author:
# Copyright (c) "", 2006,
######################################################
package require snodbc
database db PCS Administrator ",bkfqy+"
db tables sm_address_range
puts [ db "SELECT * from sm_address_range"]
db disconnect