Home > m > gui > ltpdaRepoGUI > callbacks > cb_connectBtn.m

cb_connectBtn

PURPOSE ^

Callback to connect to server

SYNOPSIS ^

function cb_connectBtn(varargin)

DESCRIPTION ^

 Callback to connect to server
 
 M Hewitson
 
 $Id: cb_connectBtn.m,v 1.3 2008/02/24 10:17:30 hewitson Exp $

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 function cb_connectBtn(varargin)
0002 
0003 % Callback to connect to server
0004 %
0005 % M Hewitson
0006 %
0007 % $Id: cb_connectBtn.m,v 1.3 2008/02/24 10:17:30 hewitson Exp $
0008 %
0009 
0010 myh     = varargin{1};
0011 mainfig = varargin{4};
0012 status  = findobj('Tag', 'statusTxt');
0013 panels = getappdata(mainfig, 'panels');
0014 
0015 % Get conn
0016 conn = getappdata(mainfig, 'connection');
0017 
0018 if isempty(conn)
0019   
0020   % get hostname
0021   hostname = get(findobj('Tag','serverTxt'), 'String');
0022   
0023   % get the database
0024   db = get(findobj('Tag','databaseTxt'), 'String');
0025 
0026   
0027   % connect
0028   conn = mysql_connect(hostname, db);
0029   if isa(conn, 'database')
0030     setappdata(mainfig, 'connection', conn);
0031     setappdata(mainfig, 'username', conn.Username);
0032     set(myh, 'String', 'disconnect');
0033     set(status, 'String', sprintf('connected to %s on %s as %s', db, hostname, conn.Username));
0034     
0035     % Set tables on query panel
0036     buildConditions(panels(3));
0037     
0038   else
0039     set(status, 'String', 'not connected');    
0040     error('Invalid connection.');
0041   end
0042 else
0043   % disconnect
0044   close(conn);
0045   conn = [];
0046   disp('* disconnected.');
0047   setappdata(mainfig, 'connection', conn);
0048   setappdata(mainfig, 'username', '');
0049   set(myh, 'String', 'connect');
0050   set(status, 'String', 'not connected');
0051 end
0052

Generated on Tue 26-Feb-2008 10:52:52 by m2html © 2003