19 lines
391 B
Tcl
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
|
|
|
|
|
|
|