PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : [VB.NET] MySQL Platzhalter



slaystation
22.10.2008, 13:59
Hallo,

bin gerade am programmieren einer Musterverwaltung,
dafür ziehe ich daten aus einer großen MySQL Datenbank.

Da jetzt die eMailvorlagen mit einem anderen Programm erstellt werden und die eMails meist Platzhalter haben (Name, Anschrift, etc)
brauch ich halt die ersetzung durch die Daten in der Datenbank, mein Ansatz:

Private Sub ph(ByVal platzhalter As String, ByVal neuerhalter As String)
mail_nachricht.Text = Replace(mail_nachricht.Text, platzhalter, neuerhalter)
End Sub

Das funktioniert soweit, so jetzt will ich das ganze in einer Klasse haben:


Public Shared ReadOnly Property platzhalter(ByVal text As String, ByVal bestid As String, ByVal bearbid As String, ByVal ansprid As String)
Get

reader = ********

While reader.Read

Replace(text, "Platzhalter1", reader.GetString(2))
Replace(text, "Platzhalter2", reader.GetString(3))
Replace(text, "Platzhalter3", reader.GetString(4))

End While
reader.Close()


wobei der reader der mysql data reader is...

so füg ich das dann in meine form ein:



mail_nachricht.Text = plhalter.platzhalter(mail_nachricht.Text, "0", "0", "0")

plhalter ist meine platzhalter klasse und mail_nachricht ist eine textbox in die der mailtext eingefügt werden soll.

bloß dann läd er immer eine leere mail, wenn ich die mail so lade funktioniert es einwandfrei, ich sehe aber auch für kurze zeit wie die mail geladen wird bloß dann verschwindet alles.

hoffe es kann mir jemand helfen weil ich steh total auf dem schlauch :?

mfg