samples.bas

这个是grs源程序,mo在图象显示上很好,所以大家一定要下载

     Case moSE_ATTR_CONV_ERROR:                 ConnectErrorMsg = "ATTRIBUTE CONVERSION ERROR"
     Case moSE_INVALID_COLUMN_DEF:              ConnectErrorMsg = "INVALID COLUMN DEFINITION"
     Case moSE_INVALID_SHAPE_BUF_SIZE:          ConnectErrorMsg = "INVALID SHAPE ARRAY BUFFER SIZE"
     Case moSE_INVALID_ENVELOPE:                ConnectErrorMsg = "ENVELOPE IS NULL, HAS NEGATIVE VALUES OR MIN > MAX"
     Case moSE_TEMP_IO_ERROR:                   ConnectErrorMsg = "TEMP FILE I/O ERROR, CAN'T OPEN OR RAN OUT OF DISK"
     Case moSE_GSIZE_TOO_SMALL:                 ConnectErrorMsg = "SPATIAL INDEX GRID SIZE IS TOO SMALL"
     Case moSE_LICENSE_EXPIRED:                 ConnectErrorMsg = "SDE RUN-TIME LICENSE HAS EXPIRED,  NO LOGINS ALLOWED"
     Case moSE_TABLE_EXISTS:                    ConnectErrorMsg = "DBMS TABLE EXISTS"
     Case moSE_INDEX_EXISTS:                    ConnectErrorMsg = "INDEX WITH THE SPECIFIED NAME ALREADY EXISTS"
     Case moSE_INDEX_NOEXIST:                   ConnectErrorMsg = "INDEX WITH THE SPECIFIED NAME DOESN'T EXIST"
     Case moSE_INVALID_POINTER:                 ConnectErrorMsg = "SPECIFIED POINTER VALUE IS NULL OR INVALID"
     Case moSE_INVALID_PARAM_VALUE:             ConnectErrorMsg = "SPECIFIED PARAMETER VALUE IS INVALID"
     Case moSE_ALL_SLIVERS:                     ConnectErrorMsg = "SLIVER FACTOR CAUSED ALL RESULTS TO BE SLIVERS"
     Case moSE_TRANS_IN_PROGRESS:               ConnectErrorMsg = "USER SPECIFIED TRANSACTION IN PROGRESS"
     Case moSE_IOMGR_NO_DBMS_CONNECT:           ConnectErrorMsg = "The iomgr has lost its connection to the underlying DBMS."
     Case moSE_DUPLICATE_ARC:                   ConnectErrorMsg = "AN ARC (startpt, midpt, endpt) ALREADY EXISTS"
     Case moSE_INVALID_ANNO_OBJECT:             ConnectErrorMsg = "SE_ANNO pointer not initialized."
     Case moSE_PT_NO_EXIST:                     ConnectErrorMsg = "SPECIFIED POINT DOESN'T EXIST IN FEAT"
     Case moSE_PTS_NOT_ADJACENT:                ConnectErrorMsg = "SPECIFIED POINTS MUST BE ADJACENT"
     Case moSE_INVALID_MID_PT:                  ConnectErrorMsg = "SPECIFIED MID POINT IS INVALID"
     Case moSE_INVALID_END_PT:                  ConnectErrorMsg = "SPECIFIED END POINT IS INVALID"
     Case moSE_INVALID_RADIUS:                  ConnectErrorMsg = "SPECIFIED RADIUS IS INVALID"
     Case moSE_LOAD_ONLY_LAYER:                 ConnectErrorMsg = "MAP LAYER IS LOAD ONLY MODE OPERATION NOT ALLOWED"
     Case moSE_LAYERS_NOT_FOUND:                ConnectErrorMsg = "LAYERS TABLE DOES NOT EXIST."
     Case moSE_FILE_IO_ERROR:                   ConnectErrorMsg = "Error writing or creating an output text file."
     Case moSE_BLOB_SIZE_TOO_LARGE:             ConnectErrorMsg = "Maximum BLOB size exceeded."
     Case moSE_CORRIDOR_OUT_OF_BOUNDS:          ConnectErrorMsg = "Resulting corridor exceeds valid coordinate range"
     Case moSE_SHAPE_INTEGRITY_ERROR:           ConnectErrorMsg = "MODEL INTEGRITY ERROR"
     Case moSE_NOT_IMPLEMENTED_YET:             ConnectErrorMsg = "Function or option is not really written yet."
     Case moSE_CAD_EXISTS:                      ConnectErrorMsg = "This shape has a cad."
     Case moSE_INVALID_TRANSID:                 ConnectErrorMsg = "Invalid internal SDE Transaction ID."
     Case moSE_INVALID_LAYER_NAME:              ConnectErrorMsg = "MAP LAYER NAME MUST NOT BE EMPTY"
     Case moSE_INVALID_LAYER_KEYWORD:           ConnectErrorMsg = "Invalid Layer Configuration Keyword used."
     Case moSE_INVALID_RELEASE:                 ConnectErrorMsg = "Invalid Release/Version of SDE server."
     Case moSE_VERSION_TBL_EXISTS:              ConnectErrorMsg = "VERSION table exists."
     Case moSE_COLUMN_NOT_BOUND:                ConnectErrorMsg = "Column has not been bound"
     Case moSE_INVALID_INDICATOR_VALUE:         ConnectErrorMsg = "Indicator variable contains an invalid value"
     Case moSE_INVALID_CONNECTION:              ConnectErrorMsg = "The connection handle is NULL closed or the wrong object."
     Case moSE_INVALID_DBA_PASSWORD:            ConnectErrorMsg = "The DBA password is not correct."
     Case moSE_PATH_NOT_FOUND:                  ConnectErrorMsg = "Coord path not found in shape edit op."
     Case moSE_SDEHOME_NOT_SET:                 ConnectErrorMsg = "No $SDEHOME variable set and we need one."
     Case moSE_NOT_TABLE_OWNER:                 ConnectErrorMsg = "User must be table owner."
     Case moSE_PROCESS_NOT_FOUND:               ConnectErrorMsg = "The process ID specified does not correspond on an SDE server."
     Case moSE_INVALID_DBMS_LOGIN:              ConnectErrorMsg = "DBMS didn't accept user/password."
     Case moSE_PASSWORD_TIMEOUT:                ConnectErrorMsg = "Password received was sent > MAXTIMEDIFF seconds before."
     Case moSE_INVALID_SERVER:                  ConnectErrorMsg = "Server machine was not found"
     Case moSE_IOMGR_NOT_AVAILABLE:             ConnectErrorMsg = "IO Mgr task not started on server"
     Case moSE_SERVICE_NOT_FOUND:               ConnectErrorMsg = "No SDE entry in the /etc/services file"
     Case moSE_INVALID_STATS_TYPE:              ConnectErrorMsg = "Tried statisitics on non-numeric"
     Case moSE_INVALID_DISTINCT_TYPE:           ConnectErrorMsg = "Distinct stats on invalid type"
     Case moSE_INVALID_GRANT_REVOKE:            ConnectErrorMsg = "Invalid use of grant/revoke function"
     Case moSE_INVALID_SDEHOME:                 ConnectErrorMsg = "The supplied SDEHOME path is invalid or NULL."
     Case moSE_INVALID_STREAM:                  ConnectErrorMsg = "Stream does not exist"
     Case moSE_TOO_MANY_STREAMS:                ConnectErrorMsg = "Max number of streams exceeded"
     Case moSE_OUT_OF_MUTEXES:                  ConnectErrorMsg = "Exceeded system's max number of mutexs."
     Case moSE_CONNECTION_LOCKED:               ConnectErrorMsg = "This connection is locked to a different thread."
     Case moSE_CONNECTION_IN_USE:               ConnectErrorMsg = "This connection is being used at the moment by another thread."
     Case moSE_NOT_A_SELECT_STATEMENT:          ConnectErrorMsg = "The SQL statement was not a select"
     Case moSE_FUNCTION_SEQUENCE_ERROR:         ConnectErrorMsg = "Function called out of sequence"
     Case moSE_WRONG_COLUMN_TYPE:               ConnectErrorMsg = "Get request on wrong column type"
     Case moSE_PTABLE_LOCKED:                   ConnectErrorMsg = "This ptable is locked to a different thread."
     Case moSE_PTABLE_IN_USE:                   ConnectErrorMsg = "This ptable is being used at the moment by another thread."
     Case moSE_STABLE_LOCKED:                   ConnectErrorMsg = "This stable is locked to a different thread."
     Case moSE_STABLE_IN_USE:                   ConnectErrorMsg = "This stable is being used at the moment by another thread."
     Case moSE_INVALID_FILTER_TYPE:             ConnectErrorMsg = "Unrecognized spatial filter type."
     Case moSE_NO_CAD:                          ConnectErrorMsg = "The given shape has no CAD."
     Case moSE_INSTANCE_NOT_AVAILABLE:          ConnectErrorMsg = "No instance running on server."
     Case moSE_INSTANCE_TOO_EARLY:              ConnectErrorMsg = "Instance is a version previous to 2.0."
     Case moSE_INVALID_SYSTEM_UNITS:            ConnectErrorMsg = "Systems units < 1 or > 2147483647."
     Case moSE_INVALID_UNITS:                   ConnectErrorMsg = "FEET,  METERS, DECIMAL_DEGREES or OTHER."
     Case moSE_INVALID_CAD_OBJECT:              ConnectErrorMsg = "SE_CAD pointer not initialized."
     Case moSE_INVALID_NUM_OF_PTS:              ConnectErrorMsg = "No longer issued"
     Case moSE_INVALID_SPATIAL_CONSTRAINT:      ConnectErrorMsg = "Spatial filters invalid for search"
     Case moSE_INVALID_STREAM_TYPE:             ConnectErrorMsg = "Invalid operation for the given stream"
     Case moSE_INVALID_SPATIAL_COLUMN:          ConnectErrorMsg = "Column contains NOT NULL values during SE_layer_create()"
     Case moSE_NO_SPATIAL_MASKS:                ConnectErrorMsg = "No spatial masks available."
     Case moSE_IOMGR_NOT_FOUND:                 ConnectErrorMsg = "Iomgr program not found."
     Case moSE_SYSTEM_IS_CLIENT_ONLY:           ConnectErrorMsg = "Operation can not possibly be run on this system -- it needs a server."
     Case moSE_MULTIPLE_SPATIAL_COLS:           ConnectErrorMsg = "Only one spatial column allowed"
     Case moSE_INVALID_SHAPE_OBJECT:            ConnectErrorMsg = "The given shape object handle is invalid"
     Case moSE_INVALID_PARTNUM:                 ConnectErrorMsg = "The specified shape part number does not exist"
     Case moSE_INCOMPATIBLE_SHAPES:             ConnectErrorMsg = "The given shapes are of incompatible types"
     Case moSE_INVALID_PART_OFFSET:             ConnectErrorMsg = "The specified part offset is invalid"
     Case moSE_INCOMPATIBLE_COORDREFS:          ConnectErrorMsg = "The given coordinate references are incompatible"
     Case moSE_COORD_OUT_OF_BOUNDS:             ConnectErrorMsg = "The specified coordinate exceeds the valid coordinate range"
     Case moSE_LAYER_CACHE_FULL:                ConnectErrorMsg = "Max. Layers exceeded in cache"
     Case moSE_INVALID_COORDREF_OBJECT:         ConnectErrorMsg = "The given coordinate reference object handle is invalid"
     Case moSE_INVALID_COORDSYS_ID:             ConnectErrorMsg = "The coordinate system identifier is invalid"
     Case moSE_INVALID_COORDSYS_DESC:           ConnectErrorMsg = "The coordinate system description is invalid"
     Case moSE_INVALID_ROW_ID_LAYER:            ConnectErrorMsg = "SE_ROW_ID owner.table does not match the layer"
     Case moSE_PROJECTION_ERROR:                ConnectErrorMsg = "Error projecting shape points"
     Case moSE_ARRAY_BYTES_EXCEEDED:            ConnectErrorMsg = "Max array bytes exceeded"
     Case moSE_POLY_SHELLS_OVERLAP:             ConnectErrorMsg = "2 donuts or 2 outer shells overlap"
     Case moSE_TOO_FEW_POINTS:                  ConnectErrorMsg = "numofpts is less than required for feature"
     Case moSE_INVALID_PART_SEPARATOR:          ConnectErrorMsg = "part separator in the wrong position"
     Case moSE_INVALID_POLYGON_CLOSURE:         ConnectErrorMsg = "polygon does not close properly"
     Case moSE_INVALID_OUTER_SHELL:             ConnectErrorMsg = "A polygon outer shell does not completely enclose all donuts for the part"
     Case moSE_ZERO_AREA_POLYGON:               ConnectErrorMsg = "Polygon shell has no area"
     Case moSE_POLYGON_HAS_VERTICAL_LINE:       ConnectErrorMsg = "Polygon shell contains a vertical line"
     Case moSE_OUTER_SHELLS_OVERLAP:            ConnectErrorMsg = "Multipart area has overlapping parts"
     Case moSE_SELF_INTERSECTING:               ConnectErrorMsg = "Linestring or poly boundary is self-intersecting"
     Case moSE_INVALID_EXPORT_FILE:             ConnectErrorMsg = "Export file is invalid"
     Case moSE_READ_ONLY_SHAPE:                 ConnectErrorMsg = "Attempted to modify or free a read-only shape from an stable."
     Case moSE_INVALID_DATA_SOURCE:             ConnectErrorMsg = "Invalid data source"
     Case moSE_INVALID_STREAM_SPEC:             ConnectErrorMsg = "Stream Spec parameter exceeds giomgr default"
     Case moSE_INVALID_ALTER_OPERATION:         ConnectErrorMsg = "Tried to remove cad or anno"
     Case moSE_INVALID_SPATIAL_COL_NAME:        ConnectErrorMsg = "Spat col name same as table name"
     Case moSE_INVALID_DATABASE:                ConnectErrorMsg = "Invalid database name"
     Case moSE_SPATIAL_SQL_NOT_INSTALLED:       ConnectErrorMsg = "Spatial SQL extension not present in underlying DBMS"
     Case moSE_NORM_DIM_INFO_NOT_FOUND:         ConnectErrorMsg = "Dimention parameters for SDO DIM is not found in the dbtune file"
     Case moSE_NORM_DIM_TAB_VALUE_NOT_FOUND:    ConnectErrorMsg = "Dimention parameters in the M table is corrupted or missing."
     Case moSE_UNSUPPORTED_NORMALIZED_OPERATION: ConnectErrorMsg = "Current operation is not supported for NORMALIZED LAYERS."
     Case moSE_INVALID_REGISTERED_LAYER_OPTION: ConnectErrorMsg = "Invalid option REGISTERED LAYERS do not allow this option."
     Case moSE_READ_ONLY:                       ConnectErrorMsg = "User has read only access to SE_ROW_ID"
     Case moSE_SDE_WARNING:                     ConnectErrorMsg = "BASE NUMBER FOR WARNING CODES"
     Case moSE_ETYPE_CHANGED:                   ConnectErrorMsg = "FUNCTION CHANGED ENTITY TYPE OF FEAT"
     Case moSE_AUTOCOMMITTED:                   ConnectErrorMsg = "This store/replace triggered an autocommit."
     Case moSE_TOO_MANY_DISTINCTS:              ConnectErrorMsg = "Too many distinct values in stats"
     Case moSE_NULL_VALUE:                      ConnectErrorMsg = "Request column value is NULL"
     Case moSE_NO_ROWS_UPDATED:                 ConnectErrorMsg = "No rows were updated"
     Case moSE_NO_CPGCVT:                       ConnectErrorMsg = "No codepage conversion"
     Case moSE_NO_CPGHOME:                      ConnectErrorMsg = "Cannot find codepage directory"
     Case moSE_DBMS_DOES_NOT_SUPPORT:           ConnectErrorMsg = "DBMS does NOT support this function"
     Case Else:                                 ConnectErrorMsg = "Unrecognized error"
  End Select
End Function