Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Et la tout bug...

  • Loading branch information...
commit 7ea06494edd0541fee314b78e2a31bbffa9561fe 1 parent 6fb08b3
Noreflex67 authored
BIN  Cabinet Services Jennie Huard.suo
View
Binary file not shown
3  Cabinet Services Jennie Huard/APropos.aspx
View
@@ -1,5 +1,4 @@
-<%@ Page Title="Qui sommes-nous" Language="vb" MasterPageFile="~/Site.Master" AutoEventWireup="false"
- CodeBehind="APropos.aspx.vb" Inherits="Cabinet_Services_Jennie_Huard.About" %>
+<%@ Page Title="Qui sommes-nous" Language="vb" MasterPageFile="~/Site.Master" AutoEventWireup="false" CodeBehind="APropos.aspx.vb" Inherits="Cabinet_Services_Jennie_Huard.About" %>
<asp:Content ID="HeaderContent" runat="server" ContentPlaceHolderID="HeadContent">
</asp:Content>
2  Cabinet Services Jennie Huard/APropos.aspx.vb
View
@@ -1,5 +1,5 @@
Imports MySql.Data.MySqlClient
-Public Class Apropos
+Public Class APropos
Inherits System.Web.UI.Page
44 Cabinet Services Jennie Huard/Cabinet Services Jennie Huard.vbproj
View
@@ -95,16 +95,16 @@
<Content Include="Account\Login.aspx" />
<Content Include="Account\Register.aspx" />
<Content Include="Assurances\AccueilAssurances.aspx" />
- <Content Include="Assurances\AssurancePret.aspx" />
<Content Include="Assurances\AssuranceInvalidite.aspx" />
<Content Include="Assurances\AssuranceMaladie.aspx" />
+ <Content Include="Assurances\AssurancePret.aspx" />
<Content Include="Assurances\AssuranceVie.aspx" />
- <Content Include="Client\DemandeRdv.aspx" />
<Content Include="Client\GestionAssurances.aspx" />
<Content Include="Client\MesAssurances.aspx" />
<Content Include="Client\ModifierDonneesPersos.aspx" />
<Content Include="Client\MonProfil.aspx" />
<Content Include="Contact.aspx" />
+ <Content Include="DemandeRdv.aspx" />
<Content Include="Placement.aspx" />
<Content Include="Representant\ConsulterDemandes.aspx" />
<Content Include="Representant\ContacterClient.aspx" />
@@ -174,15 +174,36 @@
<DependentUpon>AccueilAssurances.aspx</DependentUpon>
<SubType>ASPXCodeBehind</SubType>
</Compile>
- <Compile Include="CClient.vb" />
- <Compile Include="CDemandeClient.vb" />
- <Compile Include="Client\DemandeRdv.aspx.designer.vb">
- <DependentUpon>DemandeRdv.aspx</DependentUpon>
+ <Compile Include="Assurances\AssuranceInvalidite.aspx.designer.vb">
+ <DependentUpon>AssuranceInvalidite.aspx</DependentUpon>
</Compile>
- <Compile Include="Client\DemandeRdv.aspx.vb">
- <DependentUpon>DemandeRdv.aspx</DependentUpon>
+ <Compile Include="Assurances\AssuranceInvalidite.aspx.vb">
+ <DependentUpon>AssuranceInvalidite.aspx</DependentUpon>
+ <SubType>ASPXCodebehind</SubType>
+ </Compile>
+ <Compile Include="Assurances\AssuranceMaladie.aspx.designer.vb">
+ <DependentUpon>AssuranceMaladie.aspx</DependentUpon>
+ </Compile>
+ <Compile Include="Assurances\AssuranceMaladie.aspx.vb">
+ <DependentUpon>AssuranceMaladie.aspx</DependentUpon>
+ <SubType>ASPXCodebehind</SubType>
+ </Compile>
+ <Compile Include="Assurances\AssurancePret.aspx.designer.vb">
+ <DependentUpon>AssurancePret.aspx</DependentUpon>
+ </Compile>
+ <Compile Include="Assurances\AssurancePret.aspx.vb">
+ <DependentUpon>AssurancePret.aspx</DependentUpon>
+ <SubType>ASPXCodebehind</SubType>
+ </Compile>
+ <Compile Include="Assurances\AssuranceVie.aspx.designer.vb">
+ <DependentUpon>AssuranceVie.aspx</DependentUpon>
+ </Compile>
+ <Compile Include="Assurances\AssuranceVie.aspx.vb">
+ <DependentUpon>AssuranceVie.aspx</DependentUpon>
<SubType>ASPXCodebehind</SubType>
</Compile>
+ <Compile Include="CClient.vb" />
+ <Compile Include="CDemandeClient.vb" />
<Compile Include="Client\GestionAssurances.aspx.designer.vb">
<DependentUpon>GestionAssurances.aspx</DependentUpon>
</Compile>
@@ -219,6 +240,13 @@
<SubType>ASPXCodebehind</SubType>
</Compile>
<Compile Include="CRepresentant.vb" />
+ <Compile Include="DemandeRdv.aspx.designer.vb">
+ <DependentUpon>DemandeRdv.aspx</DependentUpon>
+ </Compile>
+ <Compile Include="DemandeRdv.aspx.vb">
+ <DependentUpon>DemandeRdv.aspx</DependentUpon>
+ <SubType>ASPXCodeBehind</SubType>
+ </Compile>
<Compile Include="Global.asax.vb">
<DependentUpon>Global.asax</DependentUpon>
</Compile>
25 Cabinet Services Jennie Huard/Client/GestionAssurances.aspx
View
@@ -1,5 +1,28 @@
-<%@ Page Title="" Language="vb" AutoEventWireup="false" MasterPageFile="~/Site.Master" CodeBehind="GestionAssurances.aspx.vb" %>
+<%@ Page Title="" Language="vb" AutoEventWireup="false" MasterPageFile="~/Site.Master" CodeBehind="GestionAssurances.aspx.vb" Inherits="Cabinet_Services_Jennie_Huard.GestionAssurances" %>
<asp:Content ID="Content1" ContentPlaceHolderID="HeadContent" runat="server">
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="MainContent" runat="server">
+ <h1>
+ GESTION D&#39;ASSURANCES ET PLACEMENTS</h1>
+ <p>
+ <asp:Label ID="lblAssurance" runat="server" Font-Size="Large"
+ Text="Mes assurances et placements :"></asp:Label>
+ </p>
+ <p>
+ <asp:Table ID="TableAssurance" runat="server" BorderStyle="Double"
+ CellPadding="1" CellSpacing="0" GridLines="Both">
+ <asp:TableRow BorderStyle="Solid">
+ <asp:TableCell ID="Categorie" Width="250px">
+ Catégorie
+ </asp:TableCell >
+ <asp:TableCell ID = "Compagnie" Width="250px">
+ Compagnie
+ </asp:TableCell>
+ <asp:TableCell ID = "Nom" Width="400px">
+ Nom spécifique
+ </asp:TableCell>
+ </asp:TableRow>
+ </asp:Table>
+ </p>
</asp:Content>
+
50 Cabinet Services Jennie Huard/Client/GestionAssurances.aspx.designer.vb
View
@@ -1,16 +1,60 @@
'------------------------------------------------------------------------------
-' <auto-generated>
+' <généré automatiquement>
' Ce code a été généré par un outil.
'
' Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si
' le code est régénéré.
-' </auto-generated>
+' </généré automatiquement>
'------------------------------------------------------------------------------
Option Strict On
Option Explicit On
-
Partial Public Class GestionAssurances
+
+ '''<summary>
+ '''Contrôle lblAssurance.
+ '''</summary>
+ '''<remarks>
+ '''Champ généré automatiquement.
+ '''Pour modifier, déplacez la déclaration de champ du fichier de concepteur dans le fichier code-behind.
+ '''</remarks>
+ Protected WithEvents lblAssurance As Global.System.Web.UI.WebControls.Label
+
+ '''<summary>
+ '''Contrôle TableAssurance.
+ '''</summary>
+ '''<remarks>
+ '''Champ généré automatiquement.
+ '''Pour modifier, déplacez la déclaration de champ du fichier de concepteur dans le fichier code-behind.
+ '''</remarks>
+ Protected WithEvents TableAssurance As Global.System.Web.UI.WebControls.Table
+
+ '''<summary>
+ '''Contrôle Categorie.
+ '''</summary>
+ '''<remarks>
+ '''Champ généré automatiquement.
+ '''Pour modifier, déplacez la déclaration de champ du fichier de concepteur dans le fichier code-behind.
+ '''</remarks>
+ Protected WithEvents Categorie As Global.System.Web.UI.WebControls.TableCell
+
+ '''<summary>
+ '''Contrôle Compagnie.
+ '''</summary>
+ '''<remarks>
+ '''Champ généré automatiquement.
+ '''Pour modifier, déplacez la déclaration de champ du fichier de concepteur dans le fichier code-behind.
+ '''</remarks>
+ Protected WithEvents Compagnie As Global.System.Web.UI.WebControls.TableCell
+
+ '''<summary>
+ '''Contrôle Nom.
+ '''</summary>
+ '''<remarks>
+ '''Champ généré automatiquement.
+ '''Pour modifier, déplacez la déclaration de champ du fichier de concepteur dans le fichier code-behind.
+ '''</remarks>
+ Protected WithEvents Nom As Global.System.Web.UI.WebControls.TableCell
End Class
25 Cabinet Services Jennie Huard/Client/GestionAssurances.aspx.vb
View
@@ -2,7 +2,32 @@
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
+ Dim Client As CClient = New CClient("Novais", "Joey", "novaisjoey@gmail.com")
+ 'MsgBox("Connexion=" & res.ToString)
+ Dim res As ArrayList = Client.AssuranceClient()
+ Dim i As Integer
+ 'MsgBox("Assurance = " & res.ToString)
+ While i < res.Count - 4
+
+ Dim Ligne As New TableRow
+ 'MsgBox("" + reader.GetString(0) + " " + reader.GetString(1))
+
+ Dim Cellule As New TableCell
+ Cellule.Text = res.Item(i)
+ Ligne.Cells.Add(Cellule)
+
+ Cellule = New TableCell
+ Cellule.Text = "<a href=" & Chr(34) & res.Item(i + 2) & Chr(34) & " target=" & Chr(34) & "_blank" & Chr(34) & " ><img src=" & Chr(34) & res.Item(i + 1) & Chr(34) & " width='60px' height='40px' alt=" & Chr(34) & res.Item(i + 3) & Chr(34) & " /></a><a href=" & Chr(34) & res.Item(i + 2) & Chr(34) & " target=" & Chr(34) & "_blank" & Chr(34) & " >" & res.Item(i + 3) & "</a>"
+ Ligne.Cells.Add(Cellule)
+
+ Cellule = New TableCell
+ Cellule.Text = res.Item(i + 4)
+ Ligne.Cells.Add(Cellule)
+
+ TableAssurance.Rows.Add(Ligne)
+ i = i + 5
+ End While
End Sub
End Class
1  TablesProjet.SQL
View
@@ -83,6 +83,7 @@ CREATE TABLE DemandeIns
insert into Representant values ('admin', 'admin123','kojibobo@hotmail.com');
insert into Client values('Axel','admin123','cestPlusFortQueMoi@ouiCestCommeCa.partoutAutourDeNous','Gauthier','Axel','2001-09-11', 'P', '418-836-0958','G621N3','M','St-Teets','6 rue Albert-le-prince','Hobo');
insert into Client values('Math','admin123','test@bilboa.com','Gauthier','Mathieu','2001-09-11', 'P', '418-836-1058','G621N2','M','Levis','103 Rue industrielle','Canada');
+insert into Client values('Joey','admin123','novaisjoey@gmail.com','Novais','Joey','2001-09-11','p','418-836-1058','G621N2','M','Reichstett','104 Rue industrielle','France');
insert into Compagnie values (1,'http://hobo.com/','CACA Québec','Image/caa.jpg');
insert into Compagnie values (2, 'http://www.desjardins.com/fr/bienvenue.jsp','Desjardins', 'Image/desjardin.png');
insert into Compagnie values (3, 'http://mathieu.com/', 'Assurance Mathieu', DEFAULT);
Please sign in to comment.
Something went wrong with that request. Please try again.