Forum: ASP.NET2.0 |
Thema:
AW: AW: AW: Eine Meldung ausgeben wenn in einem DataList keine Daten sind |
Von:
Thomas Scherner (
12.02.2007 16:08) |
Hallo benny ich mache es so um einen Ladebalken zu bewegen:
Public Sub sql_con()
Const MAXSMS As Integer = 200
Dim myReader As SqlDataReader
Dim myConn As SqlConnection
Dim myconnStr As String
Dim myCmd As SqlCommand
Dim myDataAdapter As SqlDataAdapter
Dim counter As Long = 0
myconnStr = "Server=xxx;uid=xx;pwd=xxx;Trusted_Connection=true;"
myDataAdapter = New SqlDataAdapter
myConn = New SqlConnection(myconnStr)
myCmd = New SqlCommand
myCmd.CommandType = CommandType.Text
myCmd.CommandText = "select Name,vorname from Table"
myCmd.Connection = myConn
myConn.Open()
myReader = myCmd.ExecuteReader()
myDataAdapter.SelectCommand = myCmd
Dim mobileNr As String
Do While (myReader.Read())
mobileNr = mobileNr & CStr(IIf(counter = 0, "adc=", "&adc=")) & CStr(myReader!mobil)
counter += 1
If counter Mod MAXSMS = 0 Then
mobileNr = ""
End If
Loop
Messagecounter = (counter & " SMS erfolgreich verschickt")
myConn.Close()
End Sub
Ich hoffe das hilft dir ein wenig .
Gruß
Thomas
Ich bin ein Newbie . Aber jeder hat mal angefangen. Gruß & Dank Thomas
Betreff |
Von |
Datum |
|
|
Benny
Wa
|
14.02.2007 10:41 |
|
|
Antworten
Vorsicht bei der Eingabe: Die Zeichen ' oder -- sind nicht erlaubt!