dim result as integer=-1
try
   dim da as new mysqldataadapter(SQL,myConnectionsString)
   dim dt as new datatable
   da.fill(dt)
   result=dt(0).item(0)
catch
 
finally
   dt.dispose
   da.dispose
end try
 
return result

Mit freundlichen Gr??en
DotNetErbse


[Es hei?t Paket und nicht Packet, auch wenn Standard augenscheinlich von Standar(t)e kommt,hei?t es dennoch Standar(d)]