Etienne BAUDOUX

Forum sur les projets de Etienne BAUDOUX


Impossible de compiler !!!! [RESOLU !!!]

ouyouyouy
ouyouyouy
Nouveau
Nouveau

Masculin Nombre de messages : 22
Age : 21
Humeur : Lunatique
Date d'inscription : 10/06/2011

Impossible de compiler !!!! [RESOLU !!!] Empty Impossible de compiler !!!! [RESOLU !!!]

Message par ouyouyouy le Dim 12 Juin 2011 - 19:57

Bonsoir,

Je vous expose mon problème (enfin mes problèmes) :

1) A chaque fois que je charge mon projet, une fenêtre s'affiche :
Impossible de compiler !!!! [RESOLU !!!] Captur10
Comment régler ce problème ??

2) Egalement, depuis tout à l'heure, lorsque je tente de compiler, ça affiche toujours "génération échouée" et pourtant rien dans "erreurs de génération", et donc je ne peux faire plus aucune modification du projet !! No
A l'aide svp !!!

Merci d'avance Smile Sad


Dernière édition par ouyouyouy le Dim 12 Juin 2011 - 20:20, édité 1 fois
gipse
gipse
Habitué
Habitué

Masculin Nombre de messages : 575
Localisation : en face de mon voisin
Emploi/loisirs : informatique, SZ
Humeur : je suis heureux grace a SZ !
Date d'inscription : 19/01/2011

Impossible de compiler !!!! [RESOLU !!!] Empty Re: Impossible de compiler !!!! [RESOLU !!!]

Message par gipse le Dim 12 Juin 2011 - 20:01

Alors, pour le 1er problème, c'est un bug fréquent. C'est quand tu a mis des menu, il te vire les images que tu as mis après... c'est un peu chiant, mais bon... pour l'instant il n'y a pas de remède. Rolling Eyes
Ensuite, pour le 2eme problème, tu vas dans erreur de génération, clic droit et il y a un truc comme afficher le rapport d'erreur.
Ça ouvre un document texte. Envoie le ici Wink



"Mes logiciel - clic ici":
Impossible de compiler !!!! [RESOLU !!!] Userba12
Multi Modificateur est disponible là : http://forumvelersoftware.bbactif.com/t763-multi-modifiateur drunken . Multi Modificateur est un générateur de code VB.NET.
Impossible de compiler !!!! [RESOLU !!!] Userba13
File Express est un gestionnaire de fichier.

"Mes tuto - clic ici:

Mon site : http://lesitedegipse.frblogs.com/Le-Site-De-Gipse-b1.htm
Me contacter à cette adresse : GipseSZ@yahoo.fr
ouyouyouy
ouyouyouy
Nouveau
Nouveau

Masculin Nombre de messages : 22
Age : 21
Humeur : Lunatique
Date d'inscription : 10/06/2011

Impossible de compiler !!!! [RESOLU !!!] Empty Re: Impossible de compiler !!!! [RESOLU !!!]

Message par ouyouyouy le Dim 12 Juin 2011 - 20:03

Voilà :
Spoiler:
Project : SurfOnTheWeb_2011
Last build the dimanche 12 juin 2011 at 21:55

Building failed : errors number: 3
File code : C:\Program Files (x86)\Veler Software\SoftwareZator 2011\Temp\Code.vb

Project setting :
Type : ApplicationWindows
Debug : Classique
FormStart : SplashScreen1.szw
SplashScreen : SplashScreen1.szw
Optimize : True
----------------------------------------------------------------
5 - Line 0, Column 0, Error BC2007 : option 'win32manifest:"C:\Users\Julian\Documents\Mes Projets SoftwareZator\SurfOnTheWeb_2011\Bin\SurfOnTheWeb_2011.manifest"'; non reconnue ignorée
6 - Line 534, Column 0, Error BC42020 : Déclaration de variable sans clause 'As' ; type d'Object pris par défaut.
7 - Line 534, Column 0, Error BC30037 : Caractère non valide.
----------------------------------------------------------------

' NOTE :
' TOUTES MODIFICATIONS APPORTEES A CE FICHIER CODE NE SERONT PAS PRISES EN COMPTE LORS DE LA REGENERATION DU PROJET.

'------------------------------------------------------------------------------
' <auto-generated>
' Ce code a été généré par un outil.
' Version du runtime :2.0.50727.4959
'
' Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si
' le code est régénéré.
' </auto-generated>
'------------------------------------------------------------------------------

Option Strict Off
Option Explicit On

Imports System

Imports System.ComponentModel

Imports System.Windows.Forms

<Assembly: Reflection.AssemblyTitle("SurfOnTheWeb_2011")>
<Assembly: Reflection.AssemblyDescription("")>
<Assembly: Reflection.AssemblyCompany("")>
<Assembly: Reflection.AssemblyProduct("")>
<Assembly: Reflection.AssemblyCopyright("Copyright ©️ 2011")>
<Assembly: Reflection.AssemblyTrademark("")>
<Assembly: Reflection.AssemblyVersion("1.0.0.0")>
<Assembly: Reflection.AssemblyFileVersion("1.0.0.0")>
<Assembly: Runtime.InteropServices.ComVisible(True)>


'Ce Namespace a été généré par SoftwareZator 2011 Edition Standard (2.0.0.0)
Namespace SurfOnTheWeb_2011

Public Class Internet_f
Inherits System.Windows.Forms.Form

Public WithEvents webBrowser1 As System.Windows.Forms.WebBrowser

Public WithEvents pictureBox1 As System.Windows.Forms.PictureBox

Public WithEvents pictureBox2 As System.Windows.Forms.PictureBox

Public WithEvents pictureBox3 As System.Windows.Forms.PictureBox

Public WithEvents textBox2 As System.Windows.Forms.TextBox

Public WithEvents pictureBox4 As System.Windows.Forms.PictureBox

Public WithEvents groupBox1 As System.Windows.Forms.GroupBox

Public WithEvents groupBox2 As System.Windows.Forms.GroupBox

Public WithEvents radioButton1 As System.Windows.Forms.RadioButton

Public WithEvents radioButton2 As System.Windows.Forms.RadioButton

Public WithEvents button2 As System.Windows.Forms.Button

Public WithEvents button3 As System.Windows.Forms.Button

Public WithEvents button4 As System.Windows.Forms.Button

Public WithEvents textBox1 As System.Windows.Forms.TextBox

Public WithEvents label1 As System.Windows.Forms.Label

Public WithEvents button5 As System.Windows.Forms.Button

Public WithEvents panel1 As System.Windows.Forms.Panel

Public WithEvents pictureBox5 As System.Windows.Forms.PictureBox

Public WithEvents pictureBox6 As System.Windows.Forms.PictureBox

Public WithEvents components As System.ComponentModel.IContainer

Public Sub New()
MyBase.New
Me.InitializeComponent
End Sub

Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Internet_f))
Me.webBrowser1 = New System.Windows.Forms.WebBrowser
Me.pictureBox1 = New System.Windows.Forms.PictureBox
Me.pictureBox2 = New System.Windows.Forms.PictureBox
Me.pictureBox3 = New System.Windows.Forms.PictureBox
Me.textBox2 = New System.Windows.Forms.TextBox
Me.pictureBox4 = New System.Windows.Forms.PictureBox
Me.groupBox1 = New System.Windows.Forms.GroupBox
Me.radioButton1 = New System.Windows.Forms.RadioButton
Me.radioButton2 = New System.Windows.Forms.RadioButton
Me.groupBox2 = New System.Windows.Forms.GroupBox
Me.button2 = New System.Windows.Forms.Button
Me.button3 = New System.Windows.Forms.Button
Me.button4 = New System.Windows.Forms.Button
Me.textBox1 = New System.Windows.Forms.TextBox
Me.label1 = New System.Windows.Forms.Label
Me.button5 = New System.Windows.Forms.Button
Me.panel1 = New System.Windows.Forms.Panel
Me.pictureBox6 = New System.Windows.Forms.PictureBox
Me.pictureBox5 = New System.Windows.Forms.PictureBox
CType(Me.pictureBox1,System.ComponentModel.ISupportInitialize).BeginInit
CType(Me.pictureBox2,System.ComponentModel.ISupportInitialize).BeginInit
CType(Me.pictureBox3,System.ComponentModel.ISupportInitialize).BeginInit
CType(Me.pictureBox4,System.ComponentModel.ISupportInitialize).BeginInit
Me.groupBox1.SuspendLayout
Me.groupBox2.SuspendLayout
Me.panel1.SuspendLayout
CType(Me.pictureBox6,System.ComponentModel.ISupportInitialize).BeginInit
CType(Me.pictureBox5,System.ComponentModel.ISupportInitialize).BeginInit
Me.SuspendLayout
'
'webBrowser1
'
Me.webBrowser1.Location = New System.Drawing.Point(1, 87)
Me.webBrowser1.MinimumSize = New System.Drawing.Size(20, 20)
Me.webBrowser1.Name = "webBrowser1"
Me.webBrowser1.Size = New System.Drawing.Size(1439, 766)
Me.webBrowser1.TabIndex = 0
Me.webBrowser1.Url = New System.Uri("http://www.el-desarrollador-oculto.sitew.com/#all.A", System.UriKind.Absolute)
'
'pictureBox1
'
Me.pictureBox1.Cursor = System.Windows.Forms.Cursors.Hand
Me.pictureBox1.Location = New System.Drawing.Point(11, 21)
Me.pictureBox1.Name = "pictureBox1"
Me.pictureBox1.Size = New System.Drawing.Size(41, 41)
Me.pictureBox1.TabIndex = 2
Me.pictureBox1.TabStop = false
'
'pictureBox2
'
Me.pictureBox2.Cursor = System.Windows.Forms.Cursors.Hand
Me.pictureBox2.Location = New System.Drawing.Point(58, 21)
Me.pictureBox2.Name = "pictureBox2"
Me.pictureBox2.Size = New System.Drawing.Size(43, 41)
Me.pictureBox2.TabIndex = 3
Me.pictureBox2.TabStop = false
'
'pictureBox3
'
Me.pictureBox3.Cursor = System.Windows.Forms.Cursors.Hand
Me.pictureBox3.Location = New System.Drawing.Point(1359, 55)
Me.pictureBox3.Name = "pictureBox3"
Me.pictureBox3.Size = New System.Drawing.Size(39, 40)
Me.pictureBox3.TabIndex = 5
Me.pictureBox3.TabStop = false
'
'textBox2
'
Me.textBox2.Location = New System.Drawing.Point(6, 16)
Me.textBox2.Name = "textBox2"
Me.textBox2.Size = New System.Drawing.Size(607, 22)
Me.textBox2.TabIndex = 7
'
'pictureBox4
'
Me.pictureBox4.Cursor = System.Windows.Forms.Cursors.Hand
Me.pictureBox4.Location = New System.Drawing.Point(619, 7)
Me.pictureBox4.Name = "pictureBox4"
Me.pictureBox4.Size = New System.Drawing.Size(33, 31)
Me.pictureBox4.TabIndex = 9
Me.pictureBox4.TabStop = false
'
'groupBox1
'
Me.groupBox1.Controls.Add(Me.radioButton1)
Me.groupBox1.Controls.Add(Me.pictureBox4)
Me.groupBox1.Controls.Add(Me.textBox2)
Me.groupBox1.Controls.Add(Me.radioButton2)
Me.groupBox1.Location = New System.Drawing.Point(525, 4)
Me.groupBox1.Name = "groupBox1"
Me.groupBox1.Size = New System.Drawing.Size(790, 45)
Me.groupBox1.TabIndex = 10
Me.groupBox1.TabStop = false
Me.groupBox1.Text = "Recherche"
'
'radioButton1
'
Me.radioButton1.Checked = true
Me.radioButton1.Font = New System.Drawing.Font("Segoe UI", 8.25!)
Me.radioButton1.Location = New System.Drawing.Point(658, 16)
Me.radioButton1.Name = "radioButton1"
Me.radioButton1.Size = New System.Drawing.Size(67, 18)
Me.radioButton1.TabIndex = 10
Me.radioButton1.TabStop = true
Me.radioButton1.Text = "Google"
Me.radioButton1.UseVisualStyleBackColor = true
'
'radioButton2
'
Me.radioButton2.Font = New System.Drawing.Font("Segoe UI", 8.25!)
Me.radioButton2.Location = New System.Drawing.Point(731, 16)
Me.radioButton2.Name = "radioButton2"
Me.radioButton2.Size = New System.Drawing.Size(52, 18)
Me.radioButton2.TabIndex = 11
Me.radioButton2.Text = "Bing"
Me.radioButton2.UseVisualStyleBackColor = true
'
'groupBox2
'
Me.groupBox2.Controls.Add(Me.pictureBox2)
Me.groupBox2.Controls.Add(Me.pictureBox1)
Me.groupBox2.Location = New System.Drawing.Point(1, 4)
Me.groupBox2.Name = "groupBox2"
Me.groupBox2.Size = New System.Drawing.Size(110, 74)
Me.groupBox2.TabIndex = 11
Me.groupBox2.TabStop = false
Me.groupBox2.Text = "Historique"
'
'button2
'
Me.button2.Font = New System.Drawing.Font("Segoe UI", 7!, System.Drawing.FontStyle.Italic)
Me.button2.Location = New System.Drawing.Point(1336, 21)
Me.button2.Name = "button2"
Me.button2.Size = New System.Drawing.Size(62, 22)
Me.button2.TabIndex = 13
Me.button2.Text = "A propos"
Me.button2.UseVisualStyleBackColor = true
'
'button3
'
Me.button3.Font = New System.Drawing.Font("Segoe UI", 10!, System.Drawing.FontStyle.Bold)
Me.button3.Location = New System.Drawing.Point(318, 13)
Me.button3.Name = "button3"
Me.button3.Size = New System.Drawing.Size(72, 49)
Me.button3.TabIndex = 15
Me.button3.Text = "Favoris"
Me.button3.UseVisualStyleBackColor = true
'
'button4
'
Me.button4.Location = New System.Drawing.Point(396, 13)
Me.button4.Name = "button4"
Me.button4.Size = New System.Drawing.Size(122, 23)
Me.button4.TabIndex = 16
Me.button4.Text = "Ajouter aux favoris"
Me.button4.UseVisualStyleBackColor = true
'
'textBox1
'
Me.textBox1.BackColor = System.Drawing.SystemColors.Info
Me.textBox1.Font = New System.Drawing.Font("Comic Sans MS", 10!)
Me.textBox1.Location = New System.Drawing.Point(170, 55)
Me.textBox1.Name = "textBox1"
Me.textBox1.Size = New System.Drawing.Size(1184, 26)
Me.textBox1.TabIndex = 4
'
'label1
'
Me.label1.Font = New System.Drawing.Font("Segoe UI", 12!, System.Drawing.FontStyle.Bold)
Me.label1.Location = New System.Drawing.Point(116, 67)
Me.label1.Name = "label1"
Me.label1.Size = New System.Drawing.Size(54, 23)
Me.label1.TabIndex = 17
Me.label1.Text = "URL :"
'
'button5
'
Me.button5.Location = New System.Drawing.Point(396, 39)
Me.button5.Name = "button5"
Me.button5.Size = New System.Drawing.Size(122, 23)
Me.button5.TabIndex = 18
Me.button5.Text = "Vérifier la connexion"
Me.button5.UseVisualStyleBackColor = true
'
'panel1
'
Me.panel1.Controls.Add(Me.pictureBox6)
Me.panel1.Controls.Add(Me.pictureBox5)
Me.panel1.Controls.Add(Me.button3)
Me.panel1.Controls.Add(Me.button5)
Me.panel1.Controls.Add(Me.label1)
Me.panel1.Controls.Add(Me.button2)
Me.panel1.Controls.Add(Me.pictureBox3)
Me.panel1.Controls.Add(Me.button4)
Me.panel1.Location = New System.Drawing.Point(1, -9)
Me.panel1.Name = "panel1"
Me.panel1.RightToLeft = System.Windows.Forms.RightToLeft.No
Me.panel1.Size = New System.Drawing.Size(1450, 95)
Me.panel1.TabIndex = 19
'
'pictureBox6
'
Me.pictureBox6.Location = New System.Drawing.Point(116, Cool
Me.pictureBox6.Name = "pictureBox6"
Me.pictureBox6.Size = New System.Drawing.Size(196, 50)
Me.pictureBox6.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
Me.pictureBox6.TabIndex = 20
Me.pictureBox6.TabStop = false
'
'pictureBox5
'
Me.pictureBox5.AccessibleName = "WebSecurityGuard"
Me.pictureBox5.Cursor = System.Windows.Forms.Cursors.Hand
Me.pictureBox5.Location = New System.Drawing.Point(1404, 60)
Me.pictureBox5.Name = "pictureBox5"
Me.pictureBox5.Size = New System.Drawing.Size(35, 35)
Me.pictureBox5.TabIndex = 19
Me.pictureBox5.TabStop = false
Me.pictureBox5.Tag = "WebSecurityGuard"
'
'Internet
'
Me.BackColor = System.Drawing.Color.Lavender
Me.ClientSize = New System.Drawing.Size(1404, 382)
Me.Controls.Add(Me.textBox1)
Me.Controls.Add(Me.groupBox1)
Me.Controls.Add(Me.webBrowser1)
Me.Controls.Add(Me.groupBox2)
Me.Controls.Add(Me.panel1)
Me.Icon = CType(resources.GetObject("$this.Icon"),System.Drawing.Icon)
Me.MaximumSize = New System.Drawing.Size(1450, 916)
Me.MinimumSize = New System.Drawing.Size(100, 50)
Me.Name = "Internet"
Me.Text = "Navigation web - SurfOnTheWeb 2011"
CType(Me.pictureBox1,System.ComponentModel.ISupportInitialize).EndInit
CType(Me.pictureBox2,System.ComponentModel.ISupportInitialize).EndInit
CType(Me.pictureBox3,System.ComponentModel.ISupportInitialize).EndInit
CType(Me.pictureBox4,System.ComponentModel.ISupportInitialize).EndInit
Me.groupBox1.ResumeLayout(false)
Me.groupBox1.PerformLayout
Me.groupBox2.ResumeLayout(false)
Me.panel1.ResumeLayout(false)
CType(Me.pictureBox6,System.ComponentModel.ISupportInitialize).EndInit
CType(Me.pictureBox5,System.ComponentModel.ISupportInitialize).EndInit
Me.ResumeLayout(false)
Me.PerformLayout
End Sub
End Class

Public Class SplashScreen1_f
Inherits System.Windows.Forms.Form

Public WithEvents pictureBox1 As System.Windows.Forms.PictureBox

Public WithEvents progressBar1 As System.Windows.Forms.ProgressBar

Public WithEvents label1 As System.Windows.Forms.Label

Public WithEvents button1 As System.Windows.Forms.Button

Public WithEvents components As System.ComponentModel.IContainer

Public Sub New()
MyBase.New
Me.InitializeComponent
End Sub

Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(SplashScreen1_f))
Me.pictureBox1 = New System.Windows.Forms.PictureBox
Me.progressBar1 = New System.Windows.Forms.ProgressBar
Me.label1 = New System.Windows.Forms.Label
Me.button1 = New System.Windows.Forms.Button
CType(Me.pictureBox1,System.ComponentModel.ISupportInitialize).BeginInit
Me.SuspendLayout
'
'pictureBox1
'
Me.pictureBox1.ErrorImage = CType(resources.GetObject("pictureBox1.ErrorImage"),System.Drawing.Image)
Me.pictureBox1.Image = CType(resources.GetObject("pictureBox1.Image"),System.Drawing.Image)
Me.pictureBox1.InitialImage = CType(resources.GetObject("pictureBox1.InitialImage"),System.Drawing.Image)
Me.pictureBox1.Location = New System.Drawing.Point(12, 12)
Me.pictureBox1.Name = "pictureBox1"
Me.pictureBox1.Size = New System.Drawing.Size(464, 231)
Me.pictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
Me.pictureBox1.TabIndex = 0
Me.pictureBox1.TabStop = false
'
'progressBar1
'
Me.progressBar1.Location = New System.Drawing.Point(11, 264)
Me.progressBar1.Name = "progressBar1"
Me.progressBar1.Size = New System.Drawing.Size(464, 22)
Me.progressBar1.Style = System.Windows.Forms.ProgressBarStyle.Marquee
Me.progressBar1.TabIndex = 1
Me.progressBar1.Value = 100
'
'label1
'
Me.label1.Font = New System.Drawing.Font("Segoe UI", 15!)
Me.label1.Location = New System.Drawing.Point(14, 237)
Me.label1.Name = "label1"
Me.label1.Size = New System.Drawing.Size(461, 33)
Me.label1.TabIndex = 2
Me.label1.Text = "El Desarrollador Oculto"
Me.label1.TextAlign = System.Drawing.ContentAlignment.TopCenter
'
'button1
'
Me.button1.BackColor = System.Drawing.SystemColors.InactiveBorder
Me.button1.Font = New System.Drawing.Font("Segoe UI", 12!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic),System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(5,Byte))
Me.button1.Location = New System.Drawing.Point(12, 290)
Me.button1.Name = "button1"
Me.button1.Size = New System.Drawing.Size(463, 31)
Me.button1.TabIndex = 3
Me.button1.Text = ">>>>>> Entrer >>>>>>"
Me.button1.UseVisualStyleBackColor = true
'
'SplashScreen1
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6!, 13!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.BackColor = System.Drawing.SystemColors.Window
Me.ClientSize = New System.Drawing.Size(480, 325)
Me.ControlBox = false
Me.Controls.Add(Me.button1)
Me.Controls.Add(Me.pictureBox1)
Me.Controls.Add(Me.progressBar1)
Me.Controls.Add(Me.label1)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.Icon = CType(resources.GetObject("$this.Icon"),System.Drawing.Icon)
Me.MaximizeBox = false
Me.MinimizeBox = false
Me.Name = "SplashScreen1"
Me.ShowIcon = false
Me.ShowInTaskbar = false
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "SurfOnTheWeb 2011"
CType(Me.pictureBox1,System.ComponentModel.ISupportInitialize).EndInit
Me.ResumeLayout(false)
End Sub

<System.STAThreadAttribute()> _
Public Shared Sub Main()
System.Windows.Forms.Application.EnableVisualStyles()
If My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\NET Framework Setup\NDP\v3.5", "Version", Nothing) Is Nothing Then
System.Windows.Forms.MessageBox.Show("The .Net Framework 3.5 was not found. SurfOnTheWeb_2011 can't start without it. Please install the .Net Framework 3.5 and try again.", "SurfOnTheWeb_2011", MessageBoxButtons.OK, MessageBoxIcon.Error)
System.Diagnostics.Process.Start("http://www.microsoft.com/downloads/details.aspx?FamilyId=333325FD-AE52-4E35-B531-508D977D32A6&displaylang=fr")
End
End If
My.Resources.Culture = Globalization.CultureInfo.InvariantCulture : My.Resources.Culture = My.Resources.Culture
System.Windows.Forms.Application.SetCompatibleTextRenderingDefault(False)
For Each arg As String In System.Environment.GetCommandLineArgs
If Not arg = System.Windows.Forms.Application.ExecutablePath Then
Redim Preserve ALL_ARGUMENTS_APPLICATIONS(ALL_ARGUMENTS_APPLICATIONS.Length) : ALL_ARGUMENTS_APPLICATIONS(ALL_ARGUMENTS_APPLICATIONS.Length - 1) = arg
End If
Next
System.Windows.Forms.Application.Run(New SplashScreen1_f)
End Sub
End Class

Public Class WindowsForm1_f
Inherits System.Windows.Forms.Form

Public WithEvents pictureBox1 As System.Windows.Forms.PictureBox

Public WithEvents label1 As System.Windows.Forms.Label

Public WithEvents components As System.ComponentModel.IContainer

Public Sub New()
MyBase.New
Me.InitializeComponent
End Sub

Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(WindowsForm1_f))
Me.pictureBox1 = New System.Windows.Forms.PictureBox
Me.label1 = New System.Windows.Forms.Label
CType(Me.pictureBox1,System.ComponentModel.ISupportInitialize).BeginInit
Me.SuspendLayout
'
'pictureBox1
'
Me.pictureBox1.ErrorImage = CType(resources.GetObject("pictureBox1.ErrorImage"),System.Drawing.Image)
Me.pictureBox1.Image = CType(resources.GetObject("pictureBox1.Image"),System.Drawing.Image)
Me.pictureBox1.InitialImage = CType(resources.GetObject("pictureBox1.InitialImage"),System.Drawing.Image)
Me.pictureBox1.Location = New System.Drawing.Point(-1, 0)
Me.pictureBox1.Name = "pictureBox1"
Me.pictureBox1.Size = New System.Drawing.Size(293, 158)
Me.pictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
Me.pictureBox1.TabIndex = 0
Me.pictureBox1.TabStop = false
'
'label1
'
Me.label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
Me.label1.Location = New System.Drawing.Point(0, 159)
Me.label1.Name = "label1"
Me.label1.Size = New System.Drawing.Size(291, 39)
Me.label1.TabIndex = 1
Me.label1.Text = "Copyright 2011 El Desarrollador Oculto"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Tous droits réservés"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Ce produit a été ré"& _
"alisé avec SoftwareZator 2011"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)
'
'WindowsForm1
'
Me.ClientSize = New System.Drawing.Size(292, 204)
Me.Controls.Add(Me.label1)
Me.Controls.Add(Me.pictureBox1)
Me.Icon = CType(resources.GetObject("$this.Icon"),System.Drawing.Icon)
Me.Name = "WindowsForm1"
Me.Text = "A propos"
CType(Me.pictureBox1,System.ComponentModel.ISupportInitialize).EndInit
Me.ResumeLayout(false)
End Sub
End Class

Public Class WindowsForm2_f
Inherits System.Windows.Forms.Form

Public WithEvents components As System.ComponentModel.IContainer

Public Sub New()
MyBase.New
Me.InitializeComponent
End Sub

Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(WindowsForm2_f))
Me.SuspendLayout
'
'WindowsForm2
'
Me.ClientSize = New System.Drawing.Size(292, 266)
Me.Icon = CType(resources.GetObject("$this.Icon"),System.Drawing.Icon)
Me.Name = "WindowsForm2"
Me.Text = "WindowsForm2"
Me.ResumeLayout(false)
End Sub
End Class

Public Module VARIABLES_AZERTY_ABCDE_ALPHA_BETA_DELTA_SOFTWAREZATOR_VARIABLES
Public VARIABLES_SOFTWAREZATOR_CURRENT_PLUGIN_VARIABLES As String
Public adresseweb As Object '
Public checkbing As Object '
Public checkgoogle As Object '
Public connexionok As Object '
Public extensionsur? As Object '
Public favoris() As Object = New Object(-1){} '
Public favorites As Object '
Public iffavoris As Object '
Public ifsonattention As Object '
Public ifwot As Object '
Public nameuser As Object '
Public search As Object '
Public Titre_Web As Object '
Public URL As Object '
Public workfavoris As Object '
Public wotinstallyes As Object '
Public ALL_ARGUMENTS_APPLICATIONS() As Object = New Object(-1){}
Public ALLUSERPROFILE As Object = CStr(Environment.GetEnvironmentVariable("ALLUSERPROFILE"))
Public APPDATA As Object = CStr(Environment.GetEnvironmentVariable("APPDATA"))
Public CLASSPATH As Object = CStr(Environment.GetEnvironmentVariable("CLASSPATH"))
Public CommonProgramFiles As Object = CStr(Environment.GetEnvironmentVariable("CommonProgramFiles"))
Public COMPUTERNAME As Object = CStr(Environment.GetEnvironmentVariable("COMPUTERNAME"))
Public ComSpec As Object = CStr(Environment.GetEnvironmentVariable("ComSpec"))
Public FP_NO_HOST_CHECK As Object = CStr(Environment.GetEnvironmentVariable("FP_NO_HOST_CHECK"))
Public HOMEDRIVE As Object = CStr(Environment.GetEnvironmentVariable("HOMEDRIVE"))
Public HOMEPATH As Object = CStr(Environment.GetEnvironmentVariable("HOMEPATH"))
Public LOCALAPPDATA As Object = CStr(Environment.GetEnvironmentVariable("LOCALAPPDATA"))
Public LOGONSERVER As Object = CStr(Environment.GetEnvironmentVariable("LOGONSERVER"))
Public NUMBER_OF_PROCESSORS As Object = CStr(Environment.GetEnvironmentVariable("NUMBER_OF_PROCESSORS"))
Public OS As Object = CStr(Environment.GetEnvironmentVariable("OS"))
Public PATH As Object = CStr(Environment.GetEnvironmentVariable("PATH"))
Public PATHEXT As Object = CStr(Environment.GetEnvironmentVariable("PATHEXT"))
Public PROCESSOR_ARCHITECTURE As Object = CStr(Environment.GetEnvironmentVariable("PROCESSOR_ARCHITECTURE"))
Public PROCESSOR_IDENTIFIER As Object = CStr(Environment.GetEnvironmentVariable("PROCESSOR_IDENTIFIER"))
Public PROCESSOR_LEVEL As Object = CStr(Environment.GetEnvironmentVariable("PROCESSOR_LEVEL"))
Public PROCESSOR_REVISION As Object = CStr(Environment.GetEnvironmentVariable("PROCESSOR_REVISION"))
Public ProgramData As Object = CStr(Environment.GetEnvironmentVariable("ProgramData"))
Public ProgramFiles As Object = CStr(Environment.GetEnvironmentVariable("ProgramFiles"))
Public [PUBLIC] As Object = CStr(Environment.GetEnvironmentVariable("PUBLIC"))
Public SESSIONNAME As Object = CStr(Environment.GetEnvironmentVariable("SESSIONNAME"))
Public SystemDrive As Object = CStr(Environment.GetEnvironmentVariable("SystemDrive"))
Public SystemRoot As Object = CStr(Environment.GetEnvironmentVariable("SystemRoot"))
Public TEMP As Object = CStr(Environment.GetEnvironmentVariable("TEMP"))
Public TMP As Object = CStr(Environment.GetEnvironmentVariable("TMP"))
Public USERDOMAIN As Object = CStr(Environment.GetEnvironmentVariable("USERDOMAIN"))
Public USERNAME As Object = CStr(Environment.GetEnvironmentVariable("USERNAME"))
Public USERPROFILE As Object = CStr(Environment.GetEnvironmentVariable("USERPROFILES"))
Public windir As Object = CStr(Environment.GetEnvironmentVariable("windir"))
End Module

Public Module VARIABLES_AZERTY_ABCDE_ALPHA_BETA_DELTA_FORMS_SOFTWAREZATOR_VARIABLES
Private _Internet As Internet_f = New Internet_f
Public Property Internet As Internet_f
Get
Return _Internet
End Get
Set(ByVal value As Internet_f)
_Internet = value
End Set
End Property
Private _SplashScreen1 As SplashScreen1_f = New SplashScreen1_f
Public Property SplashScreen1 As SplashScreen1_f
Get
Return _SplashScreen1
End Get
Set(ByVal value As SplashScreen1_f)
_SplashScreen1 = value
End Set
End Property
Private _WindowsForm1 As WindowsForm1_f = New WindowsForm1_f
Public Property WindowsForm1 As WindowsForm1_f
Get
Return _WindowsForm1
End Get
Set(ByVal value As WindowsForm1_f)
_WindowsForm1 = value
End Set
End Property
Private _WindowsForm2 As WindowsForm2_f = New WindowsForm2_f
Public Property WindowsForm2 As WindowsForm2_f
Get
Return _WindowsForm2
End Get
Set(ByVal value As WindowsForm2_f)
_WindowsForm2 = value
End Set
End Property
End Module



Partial Public Class Internet_f

Public Sub pictureBox3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles pictureBox3.Click
Try
ifsonattention = Me.textBox1.Text
Me.webBrowser1.Navigate("" & ifsonattention & "")
Catch err As Exception
System.Windows.Forms.MessageBox.Show(Err.Message, "SurfOnTheWeb_2011", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Sub

Public Sub pictureBox1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles pictureBox1.Click
Try
Me.webBrowser1.GoBack()
Catch err As Exception
System.Windows.Forms.MessageBox.Show(Err.Message, "SurfOnTheWeb_2011", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Sub

Public Sub webBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs)Handles webBrowser1.DocumentCompleted
Try
URL = webBrowser1.Url.OriginalString
Me.textBox1.Text = "" & URL & ""
Catch err As Exception
System.Windows.Forms.MessageBox.Show(Err.Message, "SurfOnTheWeb_2011", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Sub

Public Sub webBrowser1_DocumentTitleChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles webBrowser1.DocumentTitleChanged
Try
Titre_Web = Me.webBrowser1.DocumentTitle
Me.Text = "" & Titre_Web & " | SurfOnTheWeb 2011"
Catch err As Exception
System.Windows.Forms.MessageBox.Show(Err.Message, "SurfOnTheWeb_2011", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Sub

Public Sub pictureBox2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles pictureBox2.Click
Try
Me.webBrowser1.GoForward()
Catch err As Exception
System.Windows.Forms.MessageBox.Show(Err.Message, "SurfOnTheWeb_2011", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Sub

Public Sub pictureBox4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles pictureBox4.Click
Try
checkgoogle = CType(checkgoogle, Boolean)
checkbing = CType(checkbing, Boolean)
search = Me.textBox2.Text
checkgoogle = Me.radioButton1.Checked
checkbing = Me.radioButton2.Checked
If checkbing = True Then
Me.webBrowser1.Navigate("http://www.bing.com/search?q=" & search & "&go=&qs=n&sk=&sc=8-5&form=QBLH&filt=all")
Else
Me.webBrowser1.Navigate("http://www.google.fr/search?aq=f&sourceid=chrome&ie=UTF-8&q=" & search & "")
End If
Catch err As Exception
System.Windows.Forms.MessageBox.Show(Err.Message, "SurfOnTheWeb_2011", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Sub

Public Sub button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles button2.Click
Try
If "Dialog" <> "Dialog" Then WindowsForm1 = New WindowsForm1_f
WindowsForm1.ShowDialog()
Catch err As Exception
System.Windows.Forms.MessageBox.Show(Err.Message, "SurfOnTheWeb_2011", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Sub

Public Sub button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles button5.Click
Try
connexionok = CType(connexionok, Boolean)
connexionok = VelerSoftware_GeneralPlugin_Connecter_Internet.IsConnected()
If connexionok = False Then
System.Windows.Forms.MessageBox.Show("Votre connexion a été perdue", "Non connecté", MessageBoxButtons.OK, MessageBoxIcon.Warning).ToString
End If
If connexionok = True Then
System.Windows.Forms.MessageBox.Show("Vous êtes toujours connecté.", "Connecté", MessageBoxButtons.OK, MessageBoxIcon.Information).ToString
End If
Catch err As Exception
System.Windows.Forms.MessageBox.Show(Err.Message, "SurfOnTheWeb_2011", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Sub

Public Sub button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles button4.Click
Try
workfavoris = System.Windows.Forms.MessageBox.Show("Pour ajouter aux favoris, faites un clic droit sur la page puis cliquez sur -Ajouter aux favoris- ou -Add to favorites-", "Help", MessageBoxButtons.OK, MessageBoxIcon.None).ToString
Catch err As Exception
System.Windows.Forms.MessageBox.Show(Err.Message, "SurfOnTheWeb_2011", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Sub

Public Sub button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles button3.Click
Try
nameuser = System.Environment.UserName
Microsoft.VisualBasic.Interaction.Shell("explorer C:\Users\" & nameuser & "\Favorites", Microsoft.VisualBasic.AppWinStyle.NormalFocus, False)
Catch err As Exception
System.Windows.Forms.MessageBox.Show(Err.Message, "SurfOnTheWeb_2011", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Sub

Public Sub pictureBox5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles pictureBox5.Click
Try
Me.webBrowser1.Navigate("http://www.websecurityguard.com/fr/detail.aspx?domain=" & URL & "")
Catch err As Exception
System.Windows.Forms.MessageBox.Show(Err.Message, "SurfOnTheWeb_2011", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Sub

End Class

Partial Public Class SplashScreen1_f

Public Sub button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles button1.Click
Try
If "Dialog" <> "Dialog" Then Internet = New Internet_f
ifwot = Internet.ShowDialog().ToString
Catch err As Exception
System.Windows.Forms.MessageBox.Show(Err.Message, "SurfOnTheWeb_2011", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Sub

End Class

Partial Public Class WindowsForm1_f

End Class

Partial Public Class WindowsForm2_f

End Class


Public Class VelerSoftware_GeneralPlugin_Connecter_Internet

Private Declare Function InternetGetConnectedState Lib "wininet.dll" Alias "InternetGetConnectedState" (ByRef lpdwFlags As Integer, ByVal dwReserved As Integer) As Boolean

Shared Function IsConnected() As Boolean
Dim Desc As Integer
Return InternetGetConnectedState(Desc, 0)
End Function

End Class

End Namespace

Namespace My.Resources

'Cette classe a été générée automatiquement par la classe StronglyTypedResourceBuilder.
'''<summary>
''' Une classe de ressource fortement typée destinée, entre autres, à la consultation des chaînes localisées.
'''</summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "2.0.0.0"), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
Public Module Resources

Private resourceMan As Global.System.Resources.ResourceManager

Private resourceCulture As Global.System.Globalization.CultureInfo

'''<summary>
''' Retourne l'instance ResourceManager mise en cache utilisée par cette classe.
'''</summary>
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Public ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
Get
If Object.ReferenceEquals(resourceMan, Nothing) Then
Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("SurfOnTheWeb_2011.Resources", GetType(Resources).Assembly)
resourceMan = temp
End If
Return resourceMan
End Get
End Property

'''<summary>
''' Remplace la propriété CurrentUICulture du thread actuel pour toutes
''' les recherches de ressources à l'aide de cette classe de ressource fortement typée.
'''</summary>
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Public Property Culture() As Global.System.Globalization.CultureInfo
Get
Return resourceCulture
End Get
Set(ByVal value As Global.System.Globalization.CultureInfo)
resourceCulture = value
End Set
End Property


End Module
End Namespace
Merci de votre aide
gipse
gipse
Habitué
Habitué

Masculin Nombre de messages : 575
Localisation : en face de mon voisin
Emploi/loisirs : informatique, SZ
Humeur : je suis heureux grace a SZ !
Date d'inscription : 19/01/2011

Impossible de compiler !!!! [RESOLU !!!] Empty Re: Impossible de compiler !!!! [RESOLU !!!]

Message par gipse le Dim 12 Juin 2011 - 20:07

5 - Line 0, Column 0, Error BC2007 : option 'win32manifest:"C:\Users\Julian\Documents\Mes Projets SoftwareZator\SurfOnTheWeb_2011\Bin\SurfOnTheWeb_2011.manifest"'; non reconnue ignorée
6 - Line 534, Column 0, Error BC42020 : Déclaration de variable sans clause 'As' ; type d'Object pris par défaut.
7 - Line 534, Column 0, Error BC30037 : Caractère non valide.
Ici c'est la seule chose qui nous intéresse. Donc tu vas regarder dans les dernière modification que tu as faite, il doit y avoir un modifier la propriété d'un contrôle où tu as mis un "Caractère non valide". Ensuite regarde si ce caractère, c'est pas "As" qui sert a déclarer une valeur en VB.NET
Voila je peux pas plus t'aider attend Étienne... Embarassed



"Mes logiciel - clic ici":
Impossible de compiler !!!! [RESOLU !!!] Userba12
Multi Modificateur est disponible là : http://forumvelersoftware.bbactif.com/t763-multi-modifiateur drunken . Multi Modificateur est un générateur de code VB.NET.
Impossible de compiler !!!! [RESOLU !!!] Userba13
File Express est un gestionnaire de fichier.

"Mes tuto - clic ici:

Mon site : http://lesitedegipse.frblogs.com/Le-Site-De-Gipse-b1.htm
Me contacter à cette adresse : GipseSZ@yahoo.fr
ouyouyouy
ouyouyouy
Nouveau
Nouveau

Masculin Nombre de messages : 22
Age : 21
Humeur : Lunatique
Date d'inscription : 10/06/2011

Impossible de compiler !!!! [RESOLU !!!] Empty Re: Impossible de compiler !!!! [RESOLU !!!]

Message par ouyouyouy le Dim 12 Juin 2011 - 20:19

C'est bon ça marche !!! C'était une variable avec un "?" dedans...

Mille mercis Very Happy
gipse
gipse
Habitué
Habitué

Masculin Nombre de messages : 575
Localisation : en face de mon voisin
Emploi/loisirs : informatique, SZ
Humeur : je suis heureux grace a SZ !
Date d'inscription : 19/01/2011

Impossible de compiler !!!! [RESOLU !!!] Empty Re: Impossible de compiler !!!! [RESOLU !!!]

Message par gipse le Dim 12 Juin 2011 - 20:24

Voila Wink



"Mes logiciel - clic ici":
Impossible de compiler !!!! [RESOLU !!!] Userba12
Multi Modificateur est disponible là : http://forumvelersoftware.bbactif.com/t763-multi-modifiateur drunken . Multi Modificateur est un générateur de code VB.NET.
Impossible de compiler !!!! [RESOLU !!!] Userba13
File Express est un gestionnaire de fichier.

"Mes tuto - clic ici:

Mon site : http://lesitedegipse.frblogs.com/Le-Site-De-Gipse-b1.htm
Me contacter à cette adresse : GipseSZ@yahoo.fr
Tinei
Tinei
On s'intègre
On s'intègre

Masculin Nombre de messages : 209
Age : 21
Localisation : Sur la terre....Où peut être sur une autre planète XD
Emploi/loisirs : Réfléchissez un peu, et vous trouverez
Humeur : Très bonne
Date d'inscription : 05/11/2010

Impossible de compiler !!!! [RESOLU !!!] Empty Re: Impossible de compiler !!!! [RESOLU !!!]

Message par Tinei le Lun 13 Juin 2011 - 14:04

FormStart : SplashScreen1.szw
SplashScreen : SplashScreen1.szw

Aussi ça m'étonnerais que ça marche avec ça.
Peut-être que si ?

Pour la première erreur, tu peux modifier la propriété de chaque contrôle qui contient une image tu modifies la propriété "image"
et tu mets en valeur %(ton image)% (ce n'est pas du texte), dans la fonction "load" de ta fenêtre.



Cordialement, Tinei

_____________________________________________________________
Toinousoft
La rapidité et l'assistance


Site internet: http://tinei.olympe-network.com/toinousoft/index.html
Forum: http://toinousoft-site.frbb.net/forum
ouyouyouy
ouyouyouy
Nouveau
Nouveau

Masculin Nombre de messages : 22
Age : 21
Humeur : Lunatique
Date d'inscription : 10/06/2011

Impossible de compiler !!!! [RESOLU !!!] Empty Re: Impossible de compiler !!!! [RESOLU !!!]

Message par ouyouyouy le Lun 13 Juin 2011 - 15:02

Merci mais ça fonctionnait déjà sunny
3s prod.
3s prod.
On commence à connaître
On commence à connaître

Masculin Nombre de messages : 115
Age : 21
Localisation : Guyane Française
Emploi/loisirs : Programmation
Humeur : Toujours heureux
Date d'inscription : 04/06/2011

Impossible de compiler !!!! [RESOLU !!!] Empty Re: Impossible de compiler !!!! [RESOLU !!!]

Message par 3s prod. le Lun 13 Juin 2011 - 17:57

Bonjour pour éviter que la première erreur se reproduisent et que tu perde tout dans ton dossier de projet sauvegarde tous les fichiers resx et quand sa te fait l'erreur remet une de tes sauvegarde ça t'évitera de tout reprendre à zero.



Personne ne passera à travers mes Logiciel brider Ah Ah ah!!!
Aidez moi à améliorer mon logiciel en proposant des codes vb.net utile sur ce forum http://szseclb.forumgratuit.org/f4-proposition-de-code et pour le télécharger avec sa dernière base de donnée c'est ici http://www.3shome.sitew.com/

Contenu sponsorisé

Impossible de compiler !!!! [RESOLU !!!] Empty Re: Impossible de compiler !!!! [RESOLU !!!]

Message par Contenu sponsorisé


    La date/heure actuelle est Dim 17 Nov 2019 - 15:45