1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
|
/****************************************************************************
** ui.h extension file, included from the uic-generated form implementation.
**
** If you wish to add, delete or rename slots use TQt Designer which will
** update this file, preserving your code. Create an init() slot in place of
** a constructor, and a destroy() slot in place of a destructor.
*****************************************************************************/
#include <ntqsqldriver.h>
#include <ntqmessagebox.h>
#include <ntqsqldatabase.h>
#include <ntqlineedit.h>
#include <ntqcombobox.h>
#include <ntqspinbox.h>
#include <ntqsqlerror.h>
#include <ntqsqlcursor.h>
#include <ntqsqlselectcursor.h>
#include <ntqdatatable.h>
#include "connect.h"
static void showError( const TQSqlError& err, TQWidget* parent = 0 )
{
TQString errStr ( "The database reported an error\n" );
if ( !err.databaseText().isEmpty() )
errStr += err.databaseText();
if ( !err.driverText().isEmpty() )
errStr += err.driverText();
TQMessageBox::warning( parent, "Error", errStr );
}
ConnectDialog* conDiag = 0;
void SqlEx::init()
{
hsplit->setResizeMode( lv, TQSplitter::KeepSize );
vsplit->setResizeMode( gb, TQSplitter::KeepSize );
submitBtn->setEnabled( FALSE );
conDiag = new ConnectDialog( this, "Connection Dialog", TRUE );
}
void SqlEx::dbConnect()
{
if ( conDiag->exec() != TQDialog::Accepted )
return;
if ( dt->sqlCursor() ) {
dt->setSqlCursor( 0 );
}
// close old connection (if any)
if ( TQSqlDatabase::contains( "SqlEx" ) ) {
TQSqlDatabase* oldDb = TQSqlDatabase::database( "SqlEx" );
oldDb->close();
TQSqlDatabase::removeDatabase( "SqlEx" );
}
// open the new connection
TQSqlDatabase* db = TQSqlDatabase::addDatabase( conDiag->comboDriver->currentText(), "SqlEx" );
if ( !db ) {
TQMessageBox::warning( this, "Error", "Could not open database" );
return;
}
db->setHostName( conDiag->editHostname->text() );
db->setDatabaseName( conDiag->editDatabase->text() );
db->setPort( conDiag->portSpinBox->value() );
if ( !db->open( conDiag->editUsername->text(), conDiag->editPassword->text() ) ) {
showError( db->lastError(), this );
return;
}
lbl->setText( "Double-Click on a table-name to view the contents" );
lv->clear();
TQStringList tables = db->tables();
for ( TQStringList::Iterator it = tables.begin(); it != tables.end(); ++it ) {
TQListViewItem* lvi = new TQListViewItem( lv, *it );
TQSqlRecordInfo ri = db->recordInfo ( *it );
for ( TQSqlRecordInfo::Iterator it = ri.begin(); it != ri.end(); ++it ) {
TQString req;
if ( (*it).isRequired() > 0 ) {
req = "Yes";
} else if ( (*it).isRequired() == 0 ) {
req = "No";
} else {
req = "?";
}
TQListViewItem* fi = new TQListViewItem( lvi, (*it).name(), + TQVariant::typeToName( (*it).type() ), req );
lvi->insertItem( fi );
}
lv->insertItem( lvi );
}
submitBtn->setEnabled( TRUE );
}
void SqlEx::execQuery()
{
// use a custom cursor to populate the data table
TQSqlSelectCursor* cursor = new TQSqlSelectCursor( te->text(), TQSqlDatabase::database( "SqlEx", TRUE ) );
if ( cursor->isSelect() ) {
dt->setSqlCursor( cursor, TRUE, TRUE );
dt->setSort( TQStringList() );
dt->refresh( TQDataTable::RefreshAll );
TQString txt( "Query OK" );
if ( cursor->size() >= 0 )
txt += ", returned rows: " + TQString::number( cursor->size() );
lbl->setText( txt );
} else {
// an error occured if the cursor is not active
if ( !cursor->isActive() ) {
showError( cursor->lastError(), this );
} else {
lbl->setText( TQString("Query OK, affected rows: %1").arg( cursor->numRowsAffected() ) );
}
}
}
void SqlEx::showTable( TQListViewItem * item )
{
// get the table name
TQListViewItem* i = item->parent();
if ( !i ) {
i = item;
}
// populate the data table
TQSqlCursor* cursor = new TQSqlCursor( i->text( 0 ), TRUE, TQSqlDatabase::database( "SqlEx", TRUE ) );
dt->setSqlCursor( cursor, TRUE, TRUE );
dt->setSort( cursor->primaryIndex() );
dt->refresh( TQDataTable::RefreshAll );
lbl->setText( "Displaying table " + i->text( 0 ) );
}
|
