Bonjour,

Dans le cadre d'un projet que j'ai repris. En vb.net un language que je ne connaissais pas avant d'y mettre les mains dedans. J'ai apporté quelques modification d'évolution classique : un champ texte par la un datetimepicker par ici ...
Je vous fait pas tous le topo.
Et a un moment donné j'arrive au résultat voulu. et voilà tout content je me voyait déjà arrivé super et tout.
Et la je teste d'enregistrer ce formulaire, l'engregistement se fait a travers la sérialisation j'ai pas du tout regardé jusque la car ça marchait niquel.
L'enregistrement génére un .machintruc lisible que par le soft en question.
et la le drame. exception :
System.Runtime.Serialization.SerializationException
HResult=0x8013150C
Message=Le type 'System.Windows.Forms.Form' dans l'assembly 'System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089' n'est pas marqué comme sérialisable.
Source=mscorlib
Arborescence des appels de procédure*:
à System.Runtime.Serialization.FormatterServices.InternalGetSerializableMembers(RuntimeType type)
à System.Runtime.Serialization.FormatterServices.<>c__DisplayClass9_0.<GetSerializableMembers>b__0(MemberHolder _)
à System.Collections.Concurrent.ConcurrentDictionary`2.GetOrAdd(TKey key, Func`2 valueFactory)
à System.Runtime.Serialization.FormatterServices.GetSerializableMembers(Type type, StreamingContext context)
à System.Runtime.Serialization.Formatters.Binary.WriteObjectInfo.InitMemberInfo()
à System.Runtime.Serialization.Formatters.Binary.WriteObjectInfo.InitSerialize(Type objectType, ISurrogateSelector surrogateSelector, StreamingContext context, SerObjectInfoInit serObjectInfoInit, IFormatterConverter converter, SerializationBinder binder)
à System.Runtime.Serialization.Formatters.Binary.ObjectWriter.Write(WriteObjectInfo objectInfo, NameInfo memberNameInfo, NameInfo typeNameInfo)
à System.Runtime.Serialization.Formatters.Binary.ObjectWriter.Serialize(Object graph, Header[] inHeaders, __BinaryWriter serWriter, Boolean fCheck)
à System.Runtime.Serialization.Formatters.Binary.BinaryFormatter.Serialize(Stream serializationStream, Object graph, Header[] headers, Boolean fCheck)
à System.Runtime.Serialization.Formatters.Binary.BinaryFormatter.Serialize(Stream serializationStream, Object graph)
à piscine.Piscine.SauveTab() dans C:\D\dev\sav_piscine\Piscine\piscine\VueAppli.vb :ligne 157
à piscine.Piscine.EnregistrerSousToolStripMenuItem_Click(Object sender, EventArgs e) dans C:\D\dev\sav_piscine\Piscine\piscine\VueAppli.vb :ligne 184
à System.Windows.Forms.ToolStripItem.RaiseEvent(Object key, EventArgs e)
à System.Windows.Forms.ToolStripMenuItem.OnClick(EventArgs e)
à System.Windows.Forms.ToolStripItem.HandleClick(EventArgs e)
à System.Windows.Forms.ToolStripItem.HandleMouseUp(MouseEventArgs e)
à System.Windows.Forms.ToolStripItem.FireEventInteractive(EventArgs e, ToolStripItemEventType met)
à System.Windows.Forms.ToolStripItem.FireEvent(EventArgs e, ToolStripItemEventType met)
à System.Windows.Forms.ToolStrip.OnMouseUp(MouseEventArgs mea)
à System.Windows.Forms.ToolStripDropDown.OnMouseUp(MouseEventArgs mea)
à System.Windows.Forms.Control.WmMouseUp(Message& m, MouseButtons button, Int32 clicks)
à System.Windows.Forms.Control.WndProc(Message& m)
à System.Windows.Forms.ScrollableControl.WndProc(Message& m)
à System.Windows.Forms.ToolStrip.WndProc(Message& m)
à System.Windows.Forms.ToolStripDropDown.WndProc(Message& m)
à System.Windows.Forms.Control.ControlNativeWindow.OnMessage(Message& m)
à System.Windows.Forms.Control.ControlNativeWindow.WndProc(Message& m)
à System.Windows.Forms.NativeWindow.DebuggableCallback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam)
à System.Windows.Forms.UnsafeNativeMethods.DispatchMessageW(MSG& msg)
à System.Windows.Forms.Application.ComponentManager.System.Windows.Forms.UnsafeNativeMethods.IMsoComponentManager.FPushMessageLoop(IntPtr dwComponentID, Int32 reason, Int32 pvLoopData)
à System.Windows.Forms.Application.ThreadContext.RunMessageLoopInner(Int32 reason, ApplicationContext context)
à System.Windows.Forms.Application.ThreadContext.RunMessageLoop(Int32 reason, ApplicationContext context)
à Microsoft.VisualBasic.ApplicationServices.WindowsFormsApplicationBase.OnRun()
à Microsoft.VisualBasic.ApplicationServices.WindowsFormsApplicationBase.DoApplicationModel()
à Microsoft.VisualBasic.ApplicationServices.WindowsFormsApplicationBase.Run(String[] commandLine)
à piscine.My.MyApplication.Main(String[] Args) dans :ligne 81


Stack trace :
StackTrace " à System.Runtime.Serialization.FormatterServices.InternalGetSerializableMembers(RuntimeType type)" & vbCrLf & " à System.Runtime.Serialization.FormatterServices.<>c__DisplayClass9_0.<GetSerializableMembers>b__0(MemberHolder _)" & vbCrLf & " à System.Collections.Concurrent.ConcurrentDictionary`2.GetOrAdd(TKey key, Func`2 valueFactory)" & vbCrLf & " à System.Runtime.Serialization.FormatterServices.GetSerializableMembers(Type type, StreamingContext context)" & vbCrLf & " à System.Runtime.Serialization.Formatters.Binary.WriteObjectInfo.InitMemberInfo()" & vbCrLf & " à System.Runtime.Serialization.Formatters.Binary.WriteObjectInfo.InitSerialize(Type objectType, ISurrogateSelector surrogateSelector, StreamingContext context, SerObjectInfoInit serObjectInfoInit, IFormatterConverter converter, SerializationBinder binder)" & vbCrLf & " à System.Runtime.Serialization.Formatters.Binary.ObjectWriter.Write(WriteObjectInfo objectInfo, NameInfo memberNameInfo, NameInfo typeNameInfo)" & vbCrLf & " à System.Runtime.Serialization.Formatters.Binary.ObjectWriter.Serialize(Object graph, Header[] inHeaders, __BinaryWriter serWriter, Boolean fCheck)" & vbCrLf & " à System.Runtime.Serialization.Formatters.Binary.BinaryFormatter.Serialize(Stream serializationStream, Object graph, Header[] headers, Boolean fCheck)" & vbCrLf & " à System.Runtime.Serialization.Formatters.Binary.BinaryFormatter.Serialize(Stream serializationStream, Object graph)" & vbCrLf & " à piscine.Piscine.SauveTab() dans C:\D\dev\sav_piscine\Piscine\piscine\VueAppli.vb:ligne 157" & vbCrLf & " à piscine.Piscine.EnregistrerSousToolStripMenuItem_Click(Object sender, EventArgs e) dans C:\D\dev\sav_piscine\Piscine\piscine\VueAppli.vb:ligne 184" & vbCrLf & " à System.Windows.Forms.ToolStripItem.RaiseEvent(Object key, EventArgs e)" & vbCrLf & " à System.Windows.Forms.ToolStripMenuItem.OnClick(EventArgs e)" & vbCrLf & " à System.Windows.Forms.ToolStripItem.HandleClick(EventArgs e)" & vbCrLf & " à System.Windows.Forms.ToolStripItem.HandleMouseUp(MouseEventArgs e)" & vbCrLf & " à System.Windows.Forms.ToolStripItem.FireEventInteractive(EventArgs e, ToolStripItemEventType met)" & vbCrLf & " à System.Windows.Forms.ToolStripItem.FireEvent(EventArgs e, ToolStripItemEventType met)" & vbCrLf & " à System.Windows.Forms.ToolStrip.OnMouseUp(MouseEventArgs mea)" & vbCrLf & " à System.Windows.Forms.ToolStripDropDown.OnMouseUp(MouseEventArgs mea)" & vbCrLf & " à System.Windows.Forms.Control.WmMouseUp(Message& m, MouseButtons button, Int32 clicks)" & vbCrLf & " à System.Windows.Forms.Control.WndProc(Message& m)" & vbCrLf & " à System.Windows.Forms.ScrollableControl.WndProc(Message& m)" & vbCrLf & " à System.Windows.Forms.ToolStrip.WndProc(Message& m)" & vbCrLf & " à System.Windows.Forms.ToolStripDropDown.WndProc(Message& m)" & vbCrLf & " à System.Windows.Forms.Control.ControlNativeWindow.OnMessage(Message& m)" & vbCrLf & " à System.Windows.Forms.Control.ControlNativeWindow.WndProc(Message& m)" & vbCrLf & " à System.Windows.Forms.NativeWindow.DebuggableCallback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam)" & vbCrLf & " à System.Windows.Forms.UnsafeNativeMethods.DispatchMessageW(MSG& msg)" & vbCrLf & " à System.Windows.Forms.Application.ComponentManager.System.Windows.Forms.UnsafeNativeMethods.IMsoComponentManager.FPushMessageLoop(IntPtr dwComponentID, Int32 reason, Int32 pvLoopData)" & vbCrLf & " à System.Windows.Forms.Application.ThreadContext.RunMessageLoopInner(Int32 reason, ApplicationContext context)" & vbCrLf & " à System.Windows.Forms.Application.ThreadContext.RunMessageLoop(Int32 reason, ApplicationContext context)" & vbCrLf & " à Microsoft.VisualBasic.ApplicationServices.WindowsFormsApplicationBase.OnRun()" & vbCrLf & " à Microsoft.VisualBasic.ApplicationServices.WindowsFormsApplicationBase.DoApplicationModel()" & vbCrLf & " à Microsoft.VisualBasic.ApplicationServices.WindowsFormsApplicationBase.Run(String[] commandLine)" & vbCrLf & " à piscine.My.MyApplication.Main(String[] Args) dans :ligne 81" String

Bon sachez que j'ai quand même fouiner beaucoup avant sur le web mais j'ai rien trouvé de concluant.
Donc je me tourne vers vous les gars, les gourous du .net un peu d'aide SVP.
Je reste bien sur à votre disposition pour tout renseignement complémentaire.

Merci.