| |
| |
|
Christof
Neuß | Hallo,
vielleicht kennt ja jemand hier die Lösung.
Ich möchte über eine Selectanweisung einfach die ersten drei Spalten einer Tabelle abfragen. Alle Felder sind mir zu lang und da es es immer andere Tabellen sind, kann/will ich auch nicht immer genau die Feldnamen angeben. Gibt es etwas in der Art
SELECT Field(1),Field(2),Field(3) From MeineTabelle ???
DANKE
Christof |
|
| |
| |
| |
|
|
Detlef
Jagolski | Hallo,
was für eine Datenbank hast Du den? |
|
| |
| |
| |
|
|
 | Hallo Christof,
ich glaube Du suchst sowas wie show index, show fields bzw. show full fields und könntest damit die Tabellenstruktur einladen und damit das Statement erst erzeugen: [...]  |
|
| |
| |
| |
|
|
Uwe
''Pascal''
Niemeier | Hi Leute!
Dies könnte helfen:
KompilierenMarkierenSeparierenwindow 600,600
def %SQL_HANDLE_STMT 3
def %SQL_NTS -3
'--Initialisierung der Datenbank (Typ/Pfad/Name/Schreibweise bitte anpassen!)
'var File$="C:\1Test\"
'var Init$="Driver={Microsoft Text Driver (*.txt; *.csv)};DBQ="+File$+";Extensions=csv"
'var Name$="Test1.csv"
'var File$="C:\1Test\Test1.xls"
'var Init$="Driver={Microsoft Excel-Treiber (*.xls)};DBQ="+File$
'var Name$="[Eingang$]"
var File$="D:\Archive\Einstellungen\Alcatel 701\Nachricht.mdb"
var Init$="Driver={Microsoft Access Driver (*.mdb)};Dbq="+File$'+";Uid=;Pwd=;"
var Name$="Inbox"
db("SQLInit",Init$)
declare Handle&
external("odbc32.dll","SQLAllocHandle",%SQL_HANDLE_STMT,&SQLDBC,addr(Handle&))
var Command$="SELECT TOP 1 * FROM "+Name$'--SQL-Statement zur Auswahl des 1. Datensatzes
external("odbc32.dll","SQLExecDirect",Handle&,Command$,%SQL_NTS)
declare Count&
external("odbc32.dll","SQLNumResultCols",Handle&,addr(Count&))'--Anzahl Felder
declare Text#:dim Text#,255
whileloop 1,Count&
external("odbc32.dll","SQLDescribeCol",Handle&,&loop,Text#,255,0,0,0,0,0)
print &loop,string$(Text#,0)
endwhile
print "Fertig"
external("odbc32.dll","SQLFreeHandle",%SQL_HANDLE_STMT,Handle&)
db("SQLDone")
dispose Text#
waitkey
SeeYou
Pascal |
|
| |
| |
| |
|
|
Christof
Neuß | Hallo Leute,
DANKE, damit bin ich weiter gekommen.
Vielleicht muss ich mir noch mal eine Funktion schreiben, die einfach aus der entsprechenden Angabe die Feldposition bzw. den/die Feldnamen ermittelt und dann den Wert ausgibt. Das kriege ich hin. |
|
| |
| |
| |
|
(850)
Deutsch
English
Français
Español
Italia