Hallo, hab wieder eine frage!
wie stelle ich es an, wenn der Kunde ein T-Shirt bestellen will und dafür 5 Attribute wählen kann (ShirtDescription, Group, Style, Fabric und Sleeve). Die Eingabe soll dann mit meiner datenbank abgelichen werden und dann soll festgestellt werden, dass die gewünschte Eingabe nicht mit den möglichen Shirt übereinstimmt. Es soll eine Infobox erscheinen "Shirt nicht lieferbar, bitte geben sie eine andere Eingabe an".
Kann mir jemand helfen?
ich habe schon:
strSQL = "Select * from Shirt WHERE (ShirtDesc='" & Trim(cboShirtDescr.Text) & "') " & _
" and (Group= '" & Trim(cboShirtGroup.Text) & "') and (Style='" & Trim(cboShirtStyle.Text) & "') and(Fabric= '" & Trim(cboShirtFabr.Text) & "') and (Sleeve ='" & Trim(cboShirtSleeve.Text) & "')"
Set dbRS = dbConn.Execute(strSQL)
If dbRS!ShirtID < "" Then
MsgBox "Selection not available.", vbExclamation, "Selection of Feature missing"
Else
imgShirtPic = LoadPicture(dbRS!Photo)
txtShirtID.Text = dbRS!ShirtID
ist aber nicht ganz korrekt ab if dbRS!ShirtID...
thankx schonmal
wie stelle ich es an, wenn der Kunde ein T-Shirt bestellen will und dafür 5 Attribute wählen kann (ShirtDescription, Group, Style, Fabric und Sleeve). Die Eingabe soll dann mit meiner datenbank abgelichen werden und dann soll festgestellt werden, dass die gewünschte Eingabe nicht mit den möglichen Shirt übereinstimmt. Es soll eine Infobox erscheinen "Shirt nicht lieferbar, bitte geben sie eine andere Eingabe an".
Kann mir jemand helfen?
ich habe schon:
strSQL = "Select * from Shirt WHERE (ShirtDesc='" & Trim(cboShirtDescr.Text) & "') " & _
" and (Group= '" & Trim(cboShirtGroup.Text) & "') and (Style='" & Trim(cboShirtStyle.Text) & "') and(Fabric= '" & Trim(cboShirtFabr.Text) & "') and (Sleeve ='" & Trim(cboShirtSleeve.Text) & "')"
Set dbRS = dbConn.Execute(strSQL)
If dbRS!ShirtID < "" Then
MsgBox "Selection not available.", vbExclamation, "Selection of Feature missing"
Else
imgShirtPic = LoadPicture(dbRS!Photo)
txtShirtID.Text = dbRS!ShirtID
ist aber nicht ganz korrekt ab if dbRS!ShirtID...
thankx schonmal
