none
Lancement de l'application impossible RRS feed

  • Question

  • Bonjour/Bonsoir

    J'ai crée un " luncher " pour je serveur du jeu " minecraft "

    Alors je le code etc puis je veux le tester donc je clique sur " démarrer le débogage " alors sa se lance mais c'est comme si une fois qu'il était ouvert il se fermerai automatiquement.

    Alors je regarde dans les problèmes et je vois un avertissement je le regarde et il me dit :

    Avertissement    '.ctor' n'est pas un identificateur valide.

    J'ai chercher mais je ne trouve toujours pas ce que c'est que " .ctor "

    Pouvez-vous m'aider ?!

    Casybbl.


    • Modifié Casybbl mercredi 6 juin 2012 08:29
    mercredi 6 juin 2012 08:29

Réponses

  • Il faut obligatoirement un nom à Sub, un Endif après le File.Delete, je reposte le code, colle le dans un nouveau projet où tu auras mis un Label nommé Label3 sur la feuille qui devrait s'appeler Form1 par défaut :

    Imports System.IO
    Public Class Form1
    
        Private Sub Form1_Shown(sender As Object, e As System.EventArgs) Handles Me.Shown
            Dim sURL As String = "https://dl.dropbox.com/s/s86zc888ipojgm8/Upload.txt?dl=1"
            Dim fName As String = "C:\MonText.txt"
            Dim f As StreamReader
    
            Me.Label3.Text = "Veuillez patienter ..."
            Me.Label3.Invalidate()
            Me.Label3.Update()
    
            If File.Exists(fName) Then
                File.Delete(fName)
            End If
    
            Me.Cursor = Cursors.WaitCursor
    
            My.Computer.Network.DownloadFile(sURL, fName)
            f = New StreamReader(fName)
            Beep()
            Me.Label3.Text = f.ReadLine()
            f.Close()
    
            Me.Cursor = Cursors.Default
    
        End Sub
    
    End Class
    

    Le principe étant ici de télécharger le fichier Upload.txt lors de l'affichage de la feuille (événement Form1_Shown)

    afin de mettre à jour le texte du label.


    Cordialement, Jacques

    mercredi 6 juin 2012 10:35
  • Bonjour,

    La premier ligne ainsi que la dernière est sensé se généré toute seule.
    Quand vous êtes dans votre form double cliquer dessus par la suite vous devriez avoir :

    Public Class Form1
    
        Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
    
        End Sub
    End Class

    A partir de la vous pouvez écrire le code dedans.
    (dans votre code il manque la porté du controle, un controle ne peux pas avoir un sub)


    Cordialement,

    jeudi 7 juin 2012 06:39
    Auteur de réponse

Toutes les réponses

  • Le 06/06/2012 10:29, Casybbl a écrit :
    > Bonjour/Bonsoir
    >
    > J'ai crée un " luncher " pour je serveur du jeu " minecraft "
    >
    > Alors je le code etc puis je veux le tester donc je clique sur "
    > démarrer le débogage " alors sa se lance mais c'est comme si une fois
    > qu'il était ouvert il se fermerai automatiquement.
    >
    > Alors je regarde dans les problèmes et je vois un avertissement je le
    > regarde et il me dit :
    >
    > Avertissement    '.ctor' n'est pas un identificateur valide.
    >
    > J'ai chercher mais je ne trouve toujours pas ce que c'est que " .ctor "
    >
    > Pouvez-vous m'aider ?!
    >
     
    A tout hasard, dans l'explorateur de solution (<Ctrl-R>, s'il n'est pas
    affiché) clique sur le bouton 'Afficher tous les fichiers', puis
    développe'NomDeTaForm.vb' et double-click sur 'NomDeTaForm.Designer.vb'
     
    Regardes dans le code, notamment de InitializeComponent, s'il n'y a pas
    d'anomalies.
     
    Tu peux également lancer l’exécution par <F8> (pas à pas détaillé), pour
    voir dans la Fenêtre Exécution quelle est la dernière étape effectuée.
     
    --
     
    Cordialement,
     
    Jacques.
     

    Cordialement, Jacques
    mercredi 6 juin 2012 09:03
  • Bonjour Casybbl

    Avez vous essayer de repartir avec un nouveau projet ?
    L'idée de Jacques et très pertinent, avez vous essayer ? dans le cas ou vous avez identifiée l'erreur pourriez nous mettre le code ?


    Cordialement,

    mercredi 6 juin 2012 09:11
    Auteur de réponse
  • Bonjour,

    Pouvez-vous nous dire aussi où vous obtenez ce message d'erreur ?

    Cordialement


    Gilles TOURREAU - MVP C#
    Architecte logiciel/Consultant/Formateur Freelance
    Blog : http://gilles.tourreau.fr
    - MCPD : Enterprise Developper / Windows Developper 3.5 / ASP .NET 3.5/4.0
    - MCITP : SQL Server 2008 Developper
    - MCTS : ADO .NET 3.5 / SQL Server 2008 Developper / Windows Forms 3.5 / ASP .NET 3.5/4.0

    mercredi 6 juin 2012 09:16
    Modérateur
  • Alors dans mes erreurs il y a : Erreur    2    Instruction non valide dans un espace de noms.  

    Et avec <F8> j'ai




    • Modifié Casybbl mercredi 6 juin 2012 09:57
    mercredi 6 juin 2012 09:31
  • Par convention il n'est pas conseiller d'appelé ses fonction portant le même nom que les contrôles dans la form

    Que voulez vous faire avec cette function ?

    ou avec ce label ?


    Cordialement,

    mercredi 6 juin 2012 09:35
    Auteur de réponse
  • Plutôt avec ce label le cas de function c'est mis automatiquement

    Alors avec le label qui est sans texte je voudrais que le texte soit celui du lien suivant :  https://www.dropbox.com/s/s86zc888ipojgm8/Upload.txt?dl=1

    Et j'ai réussi a le faire sauf que quand je lance il y a une erreur qui suit


    • Modifié Casybbl mercredi 6 juin 2012 09:44
    mercredi 6 juin 2012 09:44
  • Même avis que Troxsa. Je mettrai ces lignes en commentaire dans un premier temps.

    Avec <F8>, on ne voit rien ...


    Cordialement, Jacques

    mercredi 6 juin 2012 09:45
  • Il y a un identificateur inconnu qui est dans mes erreur qui est sur " Sub " de la première ligne ci-dessous

     Sub
            Dim sURL As String = "https://dl.dropbox.com/s/s86zc888ipojgm8/Upload.txt?dl=1"
    
            Dim fName As String = "C:\MonText.txt"
            Dim f As StreamReader
    
            Me.Label3.Text = "Veuillez patienter ..."
            Me.Label3.Invalidate()
            Me.Label3.Update()
    
            If File.Exists(fName) Then
                File.Delete(fName)
    
    
                Me.Cursor = Cursors.WaitCursor
    
                My.Computer.Network.DownloadFile(sURL, fName)
                f = New StreamReader(fName)
                Beep()
                Me.Label3.Text = f.ReadLine()
                f.Close()
    
                Me.Cursor = Cursors.Default
    
        End Sub


    • Modifié Casybbl mercredi 6 juin 2012 10:16
    mercredi 6 juin 2012 09:56
  • Le 06/06/2012 11:56, Casybbl a écrit :
    > Excusez moi je suis un débutant et quel ligne ?
     
    De :
       Private Function Label3() as Object
     
    au :
       End Function
     
    associé.
     
    Comme indiqué par Troxsa, avoir une fonction qui porte le nom d'un
    contrôle, ce n'est pas conseillé. Normalement c'est impossible, je me
    fais jeter comme quoi ce nom est déjà déclaré.
     
    --
     
    Cordialement,
     
    Jacques.
     

    Cordialement, Jacques
    mercredi 6 juin 2012 10:19
  • J'ai modifier mon message au dessus... tout est parti en erreur et avertissement sauf celle qui est dans mon précédent message
    mercredi 6 juin 2012 10:22
  • Il faut obligatoirement un nom à Sub, un Endif après le File.Delete, je reposte le code, colle le dans un nouveau projet où tu auras mis un Label nommé Label3 sur la feuille qui devrait s'appeler Form1 par défaut :

    Imports System.IO
    Public Class Form1
    
        Private Sub Form1_Shown(sender As Object, e As System.EventArgs) Handles Me.Shown
            Dim sURL As String = "https://dl.dropbox.com/s/s86zc888ipojgm8/Upload.txt?dl=1"
            Dim fName As String = "C:\MonText.txt"
            Dim f As StreamReader
    
            Me.Label3.Text = "Veuillez patienter ..."
            Me.Label3.Invalidate()
            Me.Label3.Update()
    
            If File.Exists(fName) Then
                File.Delete(fName)
            End If
    
            Me.Cursor = Cursors.WaitCursor
    
            My.Computer.Network.DownloadFile(sURL, fName)
            f = New StreamReader(fName)
            Beep()
            Me.Label3.Text = f.ReadLine()
            f.Close()
    
            Me.Cursor = Cursors.Default
    
        End Sub
    
    End Class
    

    Le principe étant ici de télécharger le fichier Upload.txt lors de l'affichage de la feuille (événement Form1_Shown)

    afin de mettre à jour le texte du label.


    Cordialement, Jacques

    mercredi 6 juin 2012 10:35
  • Code mis et une erreur est venu :

    Erreur  L'événement 'Shown' est introuvable.

    Et dans le code suivant

        Sub (ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            If (CheckBox1.Checked = True) Then
                Dim sw As New System.IO.StreamWriter("log.txt")
                sw.WriteLine(TextBox1.Text)
                sw.WriteLine(TextBox2.Text)
                sw.Close()
    
                Kill("log.txt")
            End If
        End Sub

    A la première ligne du code Sub quel identificateur dois-je mettre ?!

    jeudi 7 juin 2012 04:45
  • Bonjour,

    La premier ligne ainsi que la dernière est sensé se généré toute seule.
    Quand vous êtes dans votre form double cliquer dessus par la suite vous devriez avoir :

    Public Class Form1
    
        Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
    
        End Sub
    End Class

    A partir de la vous pouvez écrire le code dedans.
    (dans votre code il manque la porté du controle, un controle ne peux pas avoir un sub)


    Cordialement,

    jeudi 7 juin 2012 06:39
    Auteur de réponse