max zahl in Tabelle auszulesen.

[fanxin]

Hallo zusammen

ich möchte alle Zählen in einer Spalte vergleichen. Danach wird grösstesten Zahl eine Variable zugeweissen. Wie soll ich programmieren.

code:

dim conn as SqlConnection
dim grossZahl as integer
dim mySql as string = "select max(Alter) as myZahl from TableName"

conn.open()

grossZahl =

conn.close()

Konnte jammand mir Hilfen. Vielen Dank!

fanxin

 

[Alex F.]

dim conn as SqlConnection
dim grossZahl as integer
dim mySql as string = "select max(Alter) as myZahl from TableName"


'ab hier neu 

Dim rs as adodb.recordset


conn.open "driver={MSSQL ODBC 3.51 Driver};server=" & Server & ";uid=" & Username & ";pwd=" & password & ";database=" + Database

rs.Open SQL, mySql 

grossZahl = rs!myZahl

rs.close
conn.close()

zusätzlich möchte ich bemerken dass dein problem diesem hier sehr ähnlich ist http://www.tutorials.de/forum/visual-basic/295823-vb6-mysql-loop-fehler.html

Manchmal hilft es sich die Fehler anderer anzuschauen um zu lernen,

Grüsse bb

 

[fanxin]

vielen Dank brainbyte

ich habe vorher mit VBA programmiert. Die Methode ist ähnlich wie deine. Aber habe ich vor paar Tage eine Buch über Visual Studio 2005 gelesen. Die neue Programmsprache unterstützt recordset nicht mehr.

In mein VS 2005 Eidtor kann ich die recordset nicht automatisch(Dropdown list) finden. Das ist wirklich mein Problem. Falls recordset in VS 2005 steht, sind so viele Code von VBA als Teil VB in VS 2005 benutzt.

Ich weiss nicht, ob ich ein Liberary nicht in Editor importiert habe oder noch ander Möglichkeit. Ich erwart dir oder jemand weiter hilfen.

dank

fanxin