login  Naam:   Wachtwoord: 
Registreer je!
 Forum

messagebox in vb

Offline Mister - 24/05/2005 19:12
Avatar van MisterHTML interesse Euhm ik heb dus een messagebox in vb gemaakt

hier de code:
  1. MessageBox.Show("U heeft zich met succes geregistreerd!" & vbCrLf & vbCrLf & "Wilt u zich nu inloggen?", "Registratie voltooid", MessageBoxButtons.YesNo, MessageBoxIcon.Information)


als je op yes klikt moet hij naar de inlogpagina gaan, en als je op no klikt moet hij gewoon naar een andere pagina gaan, hoe doe ik dit?

alvast bedankt

9 antwoorden

Gesponsorde links
Offline Fenrir - 24/05/2005 19:14
Avatar van Fenrir PHP expert Inlogpagina? Je bedoelt een website? Dan is het vbscript. Je kunt dan beter javascript gebruiken.

  1. <html>
  2. <head>
  3. <script type="text/javascript">
  4. <!--
  5. function confirmation() {
  6. var answer = confirm("Are you sure you want to leave tizag.com?")
  7. if (answer){
  8. alert("Bye bye!")
  9. window.location = "http://www.google.com/";
  10. }
  11. else{
  12. alert("Thanks for sticking around!")
  13. }
  14. }
  15. //-->
  16. </script>
  17. </head>
  18. <body>
  19.  
  20. <form>
  21. <input type="button" onclick="confirmation()" value="Leave Tizag.com">
  22. </form>
  23.  
  24. </body>
  25. </html>


http://www.tiza...onfirm.php
Offline Mister - 24/05/2005 19:15
Avatar van Mister HTML interesse nope, geen website, een windows application, gewoon een programma dus...
Offline Fenrir - 24/05/2005 19:21
Avatar van Fenrir PHP expert Maar hoe wil je dan naar de volgende pagina?
Heb je een pagina-ding gemaakt? Of gewoon een tabpanel?

Je kijkt gewoon of ze op ok klikten (zie msdn). Zo ja, dan zorg je ervoor dat de volgende pagina getoond wordt.
Offline Mister - 24/05/2005 19:23
Avatar van Mister HTML interesse ja, dit klopt:
Citaat:
Je kijkt gewoon of ze op ok klikten (zie msdn). Zo ja, dan zorg je ervoor dat de volgende pagina getoond wordt.
maar als ik dan op nee zou klikken zou hij naar een andere pagina moeten gaan.
Offline Fenrir - 24/05/2005 19:29
Avatar van Fenrir PHP expert Kan dat niet gewoon zo:
  1. if(MessageBox.Show("U heeft zich met succes geregistreerd!" & vbCrLf & vbCrLf & "Wilt u zich nu inloggen?", "Registratie voltooid", MessageBoxButtons.YesNo, MessageBoxIcon.Information))
  2. {
  3. // ga naar inlogpagina
  4. }else
  5. {
  6. // ga naar andere pagina
  7. }
Offline Mister - 24/05/2005 19:33 (laatste wijziging 24/05/2005 19:35)
Avatar van Mister HTML interesse dit heb ik nu al:

  1. If (MessageBox.Show("U heeft zich met succes geregistreerd!" & vbCrLf & vbCrLf & "Wilt u zich nu inloggen?", "Registratie voltooid", MessageBoxButtons.YesNo, MessageBoxIcon.Information)) Then
  2. Dim Login As New frmLoginKinderboerderij
  3. Me.Hide()
  4. Login.Show()
  5. Login = Nothing
  6. Else
  7. Dim Home As New frmHomeKinderboerderij
  8. Me.Hide()
  9. Home.Show()
  10. Home = Nothing
  11. End If


en dit geeft hij nog steeds verkeerd aan:

  1. (MessageBox.Show("U heeft zich met succes geregistreerd!" & vbCrLf & vbCrLf & "Wilt u zich nu inloggen?", "Registratie voltooid", MessageBoxButtons.YesNo, MessageBoxIcon.Information))


het zit hem hier: if .... die message box = wat? then... (die messagebox moet toch gelijk gesteld worden aan een waarden, ben ik zeker van.
Offline Fenrir - 24/05/2005 19:36 (laatste wijziging 24/05/2005 19:40)
Avatar van Fenrir PHP expert Misschien gewoon true/false?
Of MessageBoxResult.OK? oid?

Opzoeken in MSDN.
Offline Mister - 24/05/2005 19:39
Avatar van Mister HTML interesse yes yes, ik heb het, hier de code:

  1. If MessageBox.Show("U heeft zich met succes geregistreerd!" & vbCrLf & vbCrLf & "Wilt u zich nu inloggen?", "Registratie voltooid", MessageBoxButtons.YesNo, MessageBoxIcon.Information) = DialogResult.Yes Then
  2. Dim Login As New frmLoginKinderboerderij
  3. Me.Hide()
  4. Login.Show()
  5. Login = Nothing
  6. Else
  7. Dim Home As New frmHomeKinderboerderij
  8. Me.Hide()
  9. Home.Show()
  10. Home = Nothing
  11. End If
Offline Ontani - 24/05/2005 22:10 (laatste wijziging 24/05/2005 22:10)
Avatar van Ontani Gouden medailleGouden medailleGouden medailleGouden medaille

-1
ik vraag mij af waarom je Home = Nothing voor doet?
dit is toch nergens voor nodig

gewoon
Dim Home as New frmHomeHinderboerderij
Home.Show()
Gesponsorde links
Dit onderwerp is gesloten.
Actieve forumberichten
© 2002-2024 Sitemasters.be - Regels - Laadtijd: 0.236s