From 05c5656ce94aa8477a52ea2ee266da8f8ac7c753 Mon Sep 17 00:00:00 2001 From: Dominic Reich Date: Sun, 13 Mar 2016 13:40:24 +0100 Subject: [PATCH] testing oneclick stuff --- .vs/Gästeliste/v14/.suo | Bin 53248 -> 39936 bytes Gästeliste/Gästeliste.vbproj | 16 +++- Gästeliste/Gästeliste.vbproj.user | 6 +- Gästeliste/My Project/app.manifest | 70 ++++++++++++++ Gästeliste/frmMain.Designer.vb | 141 +++++++++++++++------------- Gästeliste/frmMain.vb | 19 ++++ 6 files changed, 181 insertions(+), 71 deletions(-) create mode 100644 Gästeliste/My Project/app.manifest diff --git a/.vs/Gästeliste/v14/.suo b/.vs/Gästeliste/v14/.suo index 11724ded4c7a6017b0a615fd6f218718137f1366..bf04dd1c11eb21c2eeb019f5977df9c9953e4351 100644 GIT binary patch delta 5267 zcmd^C4Qx}_6~6byaei>X5R$kM5{EzsG`64Z=jZom2>vCMpFn_htn(WD7n;h6qr{<* zCUc;y-K5bFAIeVyRmz|VgEj@Tt%a4k+f-4}wX};SV4H@jX{t1B)22r1kUDnmvlBuE zgH}Q6w)^zGd+s^sy?f8O=bU$6&p=ksYus+0a((96H0$JQJy)==;G6TiKcM9Vn+ZC( zPI?wbxw!fT9Lp-`%<3#yhGdE|1wsmdsw#_0k-CoUUx+D4&q0**)mP4$g~Vq}f~^ec z9E1ij6_E$qR8K5fid0&D{kk(lyRi38;MZp8hp=Z;tiXOHVtHTvuM=EkYU{TjeS$5z z7z36OZ(eTfl*+nyuITOKV)n@v_zWTz2ML3v-P$Aef+1TeI@)7qT z*aOU%`}^vx;KjBqy@-8?{fGmI=Mnvgg9!FAwmm;Y3?N=a97Zty5$um5 zUP25ah7iXPKSCTwBoQwoUO@~KVk9S#U=NZPMXJpF#Br-q-X{HH)o`>z}&W z^*fmBHQQ0HxE_04G4vRV($<0On~G2(;M2Op*cwjWxW>^ZcB zi+6Wbua8DLVolLYSeIGgsYt}Ln8)i$KGO`W|J-d%cH{Y$ny%Vk9BGe*BTabg>UxqF zT$0lzSqx5_-C_`yd6yYvo7-!!Su7So5L}{56tcRzK7>DLH4=~lGo+Mo8+;HqG+`{&D~wWpun4jMw=mEmO=)>DhCa+)n+j?%5q4S zgkaDw+0bcp%yCVQyD@CVBw5zom6hC`I+GP=6*}FtsZ~g@Z>8sMRx&vY(F)yNQzmRo z0NxSoiJ@1u4_ZF{`(F-j(tSUAr7rsP$Y+oma==@u5_mUN$Sv}t+8X#(Y6i$ZU#PN5 zd>6Dx#ks7WvIg2WXBSlY!xp<=4Dg1qRe;oiJ@+@Y9=McQDoF-e z3^f{TVSl4l7Q$hxC>wd+%3Q+aV+}f`{OM!vX(JooXGa_YIfE6zEzu){m!@-4KXZiM!aHJ2cuXG8?elUh)4wNc_QIuCpH|Lai##?{iwlPP{iYaO`X0P@HGKc z^`o+cFR&}hR=f+!Sb`U;OXe6+YpXJ0P?@X|C*6$uhtWtf&kq46?A8Y z(}?xByt*GSz*TXG9hr5km@T4H&FBmXtu~@1 z>F86V&iBT2Dg>0-P*23mNVcE{#=aowlRJTx$I9~r!m29T4ZjqvQ*3rwY!GF$DDkj% z*rs;67yG{64k?=hoJUH>tH*@&z=v5IOOKq1>4JH3=X5#y{}W9mS+RDXQkiF7DAOrh zf{b5pP_ z+8%9;8H3SgQz*P89ErAu+f2>vfsUp~$YjA1%bs_`+oE}$5?}&vlSOfo-VG*OHRx-~ z{zIll6ra0>-C((JG^_U@2m0!{Uxo7JP>R+UDqmPFYsnuo^)dn#q6t4hv%XkpJap&K zxYMpqC>rW?(O^ZQAQK~Ozsa|hgGbSYIq>>$ZPLLzD14Zh2?OWr;7@~EXcOzQ#|sT^ z%>4i25d7OKd(nbM?tdw=uA7|3rt$Cctv;7cJ>kgJKW7zu6jA@qv+MVtD(B9t+zhxR zF6DYD=6iYE+1lFfvlw}w*X?p`f->|lJt!LwMqic1&Z!`X67>)Sf($WwN zi9(Q4Cct+#-hH${{w@D#;z-$c&Qb_VmC|Jhu)-YC|mc}Ob4Ii&m XNW$BKKfyb`q#^XHVnZ`!$z=UE^6TY7 literal 53248 zcmeHQTW}lKd0x^a$b_~l(s<`9|ATA^n$rcHal5A391&Wd^s1yh+Nszb& z07)^HQZ;eXG;uDY$#f=uNS#byGM-5szhtJF%y_1gm(1kWX*1L0rRlUUo%*SL=u6{% z-=00d?qUHfC{ZBDJ(wSRJA3|f{m*~fbAI`YNB{NPKlsS+6kB*fxlj51`wuGjo9+*o z&Xq?Ly4v z_tnECrJ&@M86~Y`lvVsMDVlOlDWfKG$W2kH8u3~k4g){Oh-~gw@yz%C3KvfpgGrX3 z?&bKu_WbSteG23M6DXTE{!s}Cy&nIv-;joJta2<6 zNXz-`!^V*`me=-h#JEp-y3ZEJKK}Wxq|^3v?AHg3v<~7(diAFOP8mZ06>t;~00aTU zfDj-IhymF9W6k(}1&pbATDZp8?JT zk^l`L)8hD-=iMHcjCYrD+-^GXm%#B^z~=z30X`4-0)X}KMI8Sc@Fl>P0j~qT0{AN6 zYXHU}Y&E=zG`H!xiwSuG@7@^j3{l-kvQ0$4ls0oMNm25z_b*APF;216JJ$6EsD%~Doybj$aO zw-x0n;3r=4q;B!o5ci0Yz%1}qfp-dJWxXerWt|7Fp+~T1y5avnX5e;Cs@PQ@t_#}E* zfr1i}`cZ;vAK3p6BZ`y-+s779$wLho5#yk<9Dxm5YtKdd6t^P(n(5yKl$cU?8q${r zu+rmBqo1;C_wsi)_&e!CK92hTFsg{MIeT&Y+7eIA_^svj=Kp@3|2dy*rTvST<*4)G zoVbO|p3LbA9a$EraG01o0kmmyU4dGr8{8#|G64^_exr1Zq|I{aS zQ~u`>|Lh@AT6g$ol}XUZIH*L~#t}q;pZYE8G~L!ei%waR;UebwBIr&DT;?>=F9O&e z6-c==`ZIFkS>UhWNdf0pngskhUgBmDskZ+o?Iq8^;PHQZoB#9X|Gho`?*{t+4Ct7k ze(vZWW#zj_|LeHj(%+p#|H$hvo1{&6Hjd7Z(I ze;o6ihCHldrY-67Uwavx`WHXak$J#r$M7Oz+%{s_@sr=C-0ju^2>!c{+im%&f0pvU z9si`k4O6vRT589m2&Oo~b1KT+dyi&s_rC;VI@4^zTZlV6;z)O1#gT4QG<9~0Be~twS z)CuyOwm|B1Nux+6XoI7lfYdWm*F&8*`w;d1)IZ2HcqBdIku-_+D=8n*hRC^>@*3xC zKj2xwA;5D0>XE2RrR|aW^do>z04T4ywg1s)z-<4gJ&-;C(*93dpv>z@oR68V<^6W{ zKN-i#{x^%XX#bxBTr|?XjAJ+Ue``ariPu7-gv?e zybR97s&N9*Fa_}6UGu*_yf69RSzsW8#{lRwc5@3Q=t5P#)b_H;+eiUvO%B=8EMf57|xo(^f`ajlquJS^r?piFi-`WBk`~yRHAn@Uo3Vh z9y$A^biEk4#5|tOVrDFWb0d|a=hmj;w{Z+i@s#rKm_x~5ki!&b=DRX&`aIQO@m$A@ zBYi`xd9lyaOr73&X=x`tqJbGz*Dw$c<3UB-3&~Kz5#|vJ? zsU2I@T@@S#Thk9MWDVz8)Mp7-w7&%^eRHoExoafZ9m`6hE8vL7YKL4%QFQ1NoXZAP#U+??*Zw_`@ zgZBB;I#NUp(l3CcQjQPy_c!2;(5c zq=wXh8jOw%`r~W)+FC_BQPdM)mz9O+@_lWsR!Qdv{WEI|`CR5@ZF9D?sufQx1VW3E z#gWBeFdGS^L+SlY{-b)X=8_ZFYg&;xQuQ048ns+;smdtN9KV<=W=k9L-V3Yq^W*8v zDxOc~w0!oyuMZ?QLF)=?yp+#_0($cQ9n1d~>ZSJ~7k{$5^jiKOk0)pBG;A0G#Y^MK z_&mzdnaZ@LjoUlBIPn&OLY6V^`AzB1e)2D$`PPkJ`8c8Wb2(JZo?>?YpYQ%~;F~DX z&Tbi5|AK2!!C_FxvkH2XR_P}I4}IJl1sx}C|nr8Q`-gnvBs zIXky~OW=Q2z)LmCn9{!t?XMhjR-~TGsV!*NbGom>qj3|h&VT25<|V!5&SCDJ#1}88 zFgG7E)zcx&-3iR<~p+7Og;;j*RX}y==#E7B)Ej zC~75)x{c{So(l4yHvFR_E4q z!&|3N>s#YWRrFAP6G7f&0rZpOr-okzbwY0~O4L=PPI;Mm_O~p*kgTaeFG8ctcSwhv zOU_nkmf2dzf3_u7eo;qCFFlyr+bCm}v!R)d#I@N$VQdx)AM`n3y_4yqwEKzY|h7J(B40?FXfjHW@#BBCg}BoGAPv zQu=p`Vq{2*ncvoL`1K;C_GzS$L3*^Olz_X2dy_``{Jv30O6~e<$|5zTpfT7)TI`1f zy-(3jk;YjTy*00Uk1Xl){sQji>tmMXyw=C%>|8qfZ1is{vd3*0w8BkW(#xcOODp@V zl@dscsIY*OTP5}C-179)>DRhAi*Zc-+-dxC&UI5>dL;F0c}c~^YCE)Y3d^&bGB+g2 z{-e=ir6V_`?B|(?_H%NKZpuktx_<4!7g5Fql#={i<7;tul#24VEVra~cjEtHwwxj9 zj=^gG?~VV5=J|ivzo&Hm>{A^noRlk`Ks#Hx^;vip zi?3|>jf3_3AJ6|s)Qt7}BXh5_k~jMQk^WI@#H018^VQw<{~_LIy1;Mt|8dUYy}Rq# z|9Wfx^Xxy;+hyn4u{`@vvlo$ydCRl^Y>(fLlf{aPde8pjJTH3oAKH67`;Xl>vYkG? zy;qWF|7qB^Jo}Gl|B)8pUfa1kTLC=#Pyg90J^PPm|DpA(^XT^MKRewM!L$E#?!{*N zkEj3dm-%XY^#8&yOoczBSO>AH`;&bLg09tOkkGw_q;ClQc&NFx#}OVCd`ca&{b>$3 zxUxLGkm!+?!I5#fUQDxxlB$2-CBISPI!*Li%jj>=Q_Y&XSwl}NC|8jZKA+Bcl~xqz zypoF0k4bni%bkE2mtJ00%+7ID_>hrXrFB;3`T^U!OpiWk*7WS{OgoN*TZkUbg-oM>2Or5GztJ zg|qSa6b3;(uuXQ8ze+PzWnZLC(pN9DIAO{6n*SYFS+P<}DZA0HS2ktLRrOLO0mF`P=iTmARA8lAn5G<*9w)yOrx+1>1V9^-OncwjfUeskHKN@>+l zdGuebHPtK6c}d+{k6{_ZsV(oE{`Z&nmsJXpb=FB*ajLm~_5^FCt!tJg>@l5cVmEui z(spE~hbq1dboQHds+rxbC+S9pcB-A-qYI^9gSD3k8QiJV{Y*FPng!BN%4XJY4e$Lo zW0Fg4&ACfT@A3cbzPj`Hf9mW!{=d;joG6%;|M&R6{`->4&ecik=<$ElN{TPzg*@!> zf81BhY7ddUMeu*5n9cph&MDaGh_pvEj>-50RubwrTbk%4dzt^kDq>ajlvdO#xr~~~ zWoo#Qu54Z#zH-G_C@fj4VD+#;f1#QwRr0xo#(HRBtcHf4X*IM~tC@|Aq$8O~G#Cqo zwZLfX>fjZzz}gI!CQC1A)9E7qxmcrm;f%^<9Oe3DgZ|bL8yRt0n5{)tLcxW_&}bx@ z&W564Efl$Wm7dKHa!I{?{Ijo*w%hBc!7ETUrZq4NdxM>3*vCI@51#zz&H}r0bi{V5 zE@uLd{_kD+f49>&`@)(Y{Wlgabv-|FR(!x%0`)+=R4At_TIIm$bagqI`?Q9|mk&H{ za0=%t*<3N5ugAfQ%7gp(kFbv?En;$dd1yYjR4i4rc)AK(x9=g~;A@@UXB<7)-*?Lx_>A4LPF-u3Lca?3bOqgZ$8oI(vuA0aHrn z7c!6_xOTLLYeo5D&-0MMN>yCnN>N_#d0x2YAnT{HL+YlguiCXU+Nq|mLcqM-y65f0 zwb0l{syK3``(E@Fdmbn|XR)$dxJP}ZIY0EDWZitV=j}reG1}=xt0~HtdY+>kzIWt0 ze5{|_J02_5q|z{jvVaGX8l&c*B>`H|UT{x6}2Rsx{mD zNT;#+9pkJc{YI0JggR}^!ex=U#C>C9mLg!x zt1r0CGMo;;Q{DUhR&qG)_JAtz?#EIa2KIM4;M|+B@?(a@-c7DyGVTWGIZPRGtygma6?|O1M zYnaJ}WpV{EPUw3aaTnuo#~g*b%uyEFUMpU)-=!I=@UWxjzddiF12XObec$HxwbfnT z+|++}DK^)?b+-W(Ga$b-s$p0zzo9p4lyI%W^_1Ek>A9TvgLF8o&`6TDCj=mH} z-nm&7TY^-nb;_Sq7Au89I#*QJ7q|{0zttL0e&$OY3*h%^Y+`sU7K=rP5`j=`C>#nV zhQ@{?;i1IXa3B#4gyR#5v70wqY@CH8%h+4%M&?**P2Y|yYi!4rt#8M*F1F*UnzrNO zEBba^OQ!9(%;${^-?;JWa2#8B#YX}|@sZ*9P%xMX42_P)LqmbUSRft?1_Oa`?B+l2 zuHxL7EL94idD!hrgxtwp)?folVmG$gW9YimVyyYEOcZMyYn8>TnQa>$4IG!Z4aZ$9I508!x#iH58p@^1V48_8l7K+ByKp+$uj@&T1tLc!~WgYimqlLGx z&bKe+J8I1*6(2ZgZh$SqBkzvjgbXpA5otQmgMAM`vH$G5n6nt#Nj;tR*|_uz&V$@N zq`N&R6?&%L#8U*)~)|Ha1P`lsfgH<-)6PVLsI|8Wmg zek(f(9$M~+N+FJX8J|Uz5y%NqWgZg2h%OJrz{B&aR`w|F#J(TEk#IM1Lj6{EBcZc> z)U*G|uHV)^J*2EFiFE5L;MsqzHfYcO z+n`%^OQL80m8-G{x^Ax@&;D!Y3hXuH*?-&dP*&TdwBLL7U$GKWJNs?J^G!~xp8eOe z|DrE=_TR1Br#<_xXa99+fA{RacV_=xsoQ^dqw#H*S(>c&-`&_?o)MT|!B$gu<|E-5 zfm8R|-NZ8j`=tP+Jo4@_oO9nvvk|xio`x=b>+rtz?7wvNY-i=5|6mZ-L#dxNyLz5- zboF$;>)C(n-O};oZdhIW+5Ve?_vt1)9;C0S@aIgyv#^XG^@`lpiaaL2z~L&ptvn$V zNj>fece(tbt{f<0|NyAnT^;;JFlRKoB! zP1Lc{m=tx%4P#G>=VBhf%CtU4s=Q%-iB zT@`rae{YZfcYZwZ=If)c%!OX7{Pst0egER!8bTNoYNk|N%+V#?+BdH?^>%k%wbf`9 z_c;QwYLI%pN|*gQM*niHRz7z0=*Gr|x)D-Km8GM@fk5!+rRk|;W?3uf_V;ZVf7TCu bTF-j+`tL?}&e@qC2=S}IcHCdPS?~V=wqd#l diff --git a/Gästeliste/Gästeliste.vbproj b/Gästeliste/Gästeliste.vbproj index 43ad189..49aceec 100644 --- a/Gästeliste/Gästeliste.vbproj +++ b/Gästeliste/Gästeliste.vbproj @@ -31,11 +31,10 @@ Gästeliste Dominic Reich false - 2 + 3 1.0.0.%2a - false + true true - true true true @@ -74,7 +73,7 @@ On - bed.ico + AddressBook.ico 7333803A93B717E3FFCB65C8CB363B334722D217 @@ -86,7 +85,13 @@ true - true + false + + + Internet + + + My Project\app.manifest @@ -179,6 +184,7 @@ GästeDataSet.xsd + MyApplicationCodeGenerator Application.Designer.vb diff --git a/Gästeliste/Gästeliste.vbproj.user b/Gästeliste/Gästeliste.vbproj.user index 8633cf3..f5b798f 100644 --- a/Gästeliste/Gästeliste.vbproj.user +++ b/Gästeliste/Gästeliste.vbproj.user @@ -3,10 +3,10 @@ Z:\Gaesteliste\|publish\ http://tools.dominicreich.com/Gaesteliste/ - - + http://tmsn.at/%3ftools&gaesteliste + http://tools.dominicreich.com/Gaesteliste/ - + https://github.com/freefallcid/Gaesteliste/issues de-DE false diff --git a/Gästeliste/My Project/app.manifest b/Gästeliste/My Project/app.manifest new file mode 100644 index 0000000..0cefe1a --- /dev/null +++ b/Gästeliste/My Project/app.manifest @@ -0,0 +1,70 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + \ No newline at end of file diff --git a/Gästeliste/frmMain.Designer.vb b/Gästeliste/frmMain.Designer.vb index 7c4e79a..6cc6925 100644 --- a/Gästeliste/frmMain.Designer.vb +++ b/Gästeliste/frmMain.Designer.vb @@ -25,14 +25,6 @@ Partial Class frmMain Me.components = New System.ComponentModel.Container() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMain)) Me.DataGridView1 = New System.Windows.Forms.DataGridView() - Me.mnuMain = New System.Windows.Forms.MenuStrip() - Me.HilfeToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.InfoToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.ToolStripMenuItem1 = New System.Windows.Forms.ToolStripSeparator() - Me.HilfePerEmailAnfordernToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.FehlerMeldenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.mnuContext = New System.Windows.Forms.ContextMenuStrip(Me.components) - Me.EintragLöschenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.IDDataGridViewTextBoxColumn = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.NachnameDataGridViewTextBoxColumn = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.VornameDataGridViewTextBoxColumn = New System.Windows.Forms.DataGridViewTextBoxColumn() @@ -47,12 +39,22 @@ Partial Class frmMain Me.AnmerkungDataGridViewTextBoxColumn = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.GästeBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.GästeDataSet = New Gästeliste.GästeDataSet() + Me.mnuMain = New System.Windows.Forms.MenuStrip() + Me.HilfeToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.InfoToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.OnlineHilfeToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripMenuItem1 = New System.Windows.Forms.ToolStripSeparator() + Me.HilfePerEmailAnfordernToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.FehlerMeldenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.mnuContext = New System.Windows.Forms.ContextMenuStrip(Me.components) + Me.EintragLöschenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.UpdateToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripMenuItem2 = New System.Windows.Forms.ToolStripSeparator() CType(Me.DataGridView1, System.ComponentModel.ISupportInitialize).BeginInit() - Me.mnuMain.SuspendLayout() - Me.mnuContext.SuspendLayout() CType(Me.GästeBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.GästeDataSet, System.ComponentModel.ISupportInitialize).BeginInit() + Me.mnuMain.SuspendLayout() + Me.mnuContext.SuspendLayout() Me.SuspendLayout() ' 'DataGridView1 @@ -70,57 +72,6 @@ Partial Class frmMain Me.DataGridView1.Size = New System.Drawing.Size(818, 483) Me.DataGridView1.TabIndex = 4 ' - 'mnuMain - ' - Me.mnuMain.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.HilfeToolStripMenuItem}) - Me.mnuMain.Location = New System.Drawing.Point(0, 0) - Me.mnuMain.Name = "mnuMain" - Me.mnuMain.Size = New System.Drawing.Size(818, 24) - Me.mnuMain.TabIndex = 5 - Me.mnuMain.Text = "MenuStrip1" - ' - 'HilfeToolStripMenuItem - ' - Me.HilfeToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.InfoToolStripMenuItem, Me.OnlineHilfeToolStripMenuItem, Me.ToolStripMenuItem1, Me.HilfePerEmailAnfordernToolStripMenuItem, Me.FehlerMeldenToolStripMenuItem}) - Me.HilfeToolStripMenuItem.Name = "HilfeToolStripMenuItem" - Me.HilfeToolStripMenuItem.Size = New System.Drawing.Size(44, 20) - Me.HilfeToolStripMenuItem.Text = "Hilfe" - ' - 'InfoToolStripMenuItem - ' - Me.InfoToolStripMenuItem.Name = "InfoToolStripMenuItem" - Me.InfoToolStripMenuItem.Size = New System.Drawing.Size(206, 22) - Me.InfoToolStripMenuItem.Text = "Info" - ' - 'ToolStripMenuItem1 - ' - Me.ToolStripMenuItem1.Name = "ToolStripMenuItem1" - Me.ToolStripMenuItem1.Size = New System.Drawing.Size(203, 6) - ' - 'HilfePerEmailAnfordernToolStripMenuItem - ' - Me.HilfePerEmailAnfordernToolStripMenuItem.Name = "HilfePerEmailAnfordernToolStripMenuItem" - Me.HilfePerEmailAnfordernToolStripMenuItem.Size = New System.Drawing.Size(206, 22) - Me.HilfePerEmailAnfordernToolStripMenuItem.Text = "Hilfe per Email anfordern" - ' - 'FehlerMeldenToolStripMenuItem - ' - Me.FehlerMeldenToolStripMenuItem.Name = "FehlerMeldenToolStripMenuItem" - Me.FehlerMeldenToolStripMenuItem.Size = New System.Drawing.Size(206, 22) - Me.FehlerMeldenToolStripMenuItem.Text = "Fehler melden" - ' - 'mnuContext - ' - Me.mnuContext.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.EintragLöschenToolStripMenuItem}) - Me.mnuContext.Name = "mnuContext" - Me.mnuContext.Size = New System.Drawing.Size(156, 26) - ' - 'EintragLöschenToolStripMenuItem - ' - Me.EintragLöschenToolStripMenuItem.Name = "EintragLöschenToolStripMenuItem" - Me.EintragLöschenToolStripMenuItem.Size = New System.Drawing.Size(155, 22) - Me.EintragLöschenToolStripMenuItem.Text = "Eintrag löschen" - ' 'IDDataGridViewTextBoxColumn ' Me.IDDataGridViewTextBoxColumn.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.AllCells @@ -226,12 +177,74 @@ Partial Class frmMain Me.GästeDataSet.DataSetName = "GästeDataSet" Me.GästeDataSet.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema ' + 'mnuMain + ' + Me.mnuMain.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.HilfeToolStripMenuItem}) + Me.mnuMain.Location = New System.Drawing.Point(0, 0) + Me.mnuMain.Name = "mnuMain" + Me.mnuMain.Size = New System.Drawing.Size(818, 24) + Me.mnuMain.TabIndex = 5 + Me.mnuMain.Text = "MenuStrip1" + ' + 'HilfeToolStripMenuItem + ' + Me.HilfeToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.InfoToolStripMenuItem, Me.OnlineHilfeToolStripMenuItem, Me.ToolStripMenuItem1, Me.UpdateToolStripMenuItem, Me.ToolStripMenuItem2, Me.HilfePerEmailAnfordernToolStripMenuItem, Me.FehlerMeldenToolStripMenuItem}) + Me.HilfeToolStripMenuItem.Name = "HilfeToolStripMenuItem" + Me.HilfeToolStripMenuItem.Size = New System.Drawing.Size(44, 20) + Me.HilfeToolStripMenuItem.Text = "Hilfe" + ' + 'InfoToolStripMenuItem + ' + Me.InfoToolStripMenuItem.Name = "InfoToolStripMenuItem" + Me.InfoToolStripMenuItem.Size = New System.Drawing.Size(206, 22) + Me.InfoToolStripMenuItem.Text = "Info" + ' 'OnlineHilfeToolStripMenuItem ' Me.OnlineHilfeToolStripMenuItem.Name = "OnlineHilfeToolStripMenuItem" Me.OnlineHilfeToolStripMenuItem.Size = New System.Drawing.Size(206, 22) Me.OnlineHilfeToolStripMenuItem.Text = "Online-Hilfe" ' + 'ToolStripMenuItem1 + ' + Me.ToolStripMenuItem1.Name = "ToolStripMenuItem1" + Me.ToolStripMenuItem1.Size = New System.Drawing.Size(203, 6) + ' + 'HilfePerEmailAnfordernToolStripMenuItem + ' + Me.HilfePerEmailAnfordernToolStripMenuItem.Name = "HilfePerEmailAnfordernToolStripMenuItem" + Me.HilfePerEmailAnfordernToolStripMenuItem.Size = New System.Drawing.Size(206, 22) + Me.HilfePerEmailAnfordernToolStripMenuItem.Text = "Hilfe per Email anfordern" + ' + 'FehlerMeldenToolStripMenuItem + ' + Me.FehlerMeldenToolStripMenuItem.Name = "FehlerMeldenToolStripMenuItem" + Me.FehlerMeldenToolStripMenuItem.Size = New System.Drawing.Size(206, 22) + Me.FehlerMeldenToolStripMenuItem.Text = "Fehler melden" + ' + 'mnuContext + ' + Me.mnuContext.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.EintragLöschenToolStripMenuItem}) + Me.mnuContext.Name = "mnuContext" + Me.mnuContext.Size = New System.Drawing.Size(156, 26) + ' + 'EintragLöschenToolStripMenuItem + ' + Me.EintragLöschenToolStripMenuItem.Name = "EintragLöschenToolStripMenuItem" + Me.EintragLöschenToolStripMenuItem.Size = New System.Drawing.Size(155, 22) + Me.EintragLöschenToolStripMenuItem.Text = "Eintrag löschen" + ' + 'UpdateToolStripMenuItem + ' + Me.UpdateToolStripMenuItem.Name = "UpdateToolStripMenuItem" + Me.UpdateToolStripMenuItem.Size = New System.Drawing.Size(206, 22) + Me.UpdateToolStripMenuItem.Text = "Update" + ' + 'ToolStripMenuItem2 + ' + Me.ToolStripMenuItem2.Name = "ToolStripMenuItem2" + Me.ToolStripMenuItem2.Size = New System.Drawing.Size(203, 6) + ' 'frmMain ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) @@ -244,11 +257,11 @@ Partial Class frmMain Me.Name = "frmMain" Me.Text = "Gästeliste" CType(Me.DataGridView1, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.GästeBindingSource, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.GästeDataSet, System.ComponentModel.ISupportInitialize).EndInit() Me.mnuMain.ResumeLayout(False) Me.mnuMain.PerformLayout() Me.mnuContext.ResumeLayout(False) - CType(Me.GästeBindingSource, System.ComponentModel.ISupportInitialize).EndInit() - CType(Me.GästeDataSet, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() @@ -278,4 +291,6 @@ Partial Class frmMain Friend WithEvents mnuContext As ContextMenuStrip Friend WithEvents EintragLöschenToolStripMenuItem As ToolStripMenuItem Friend WithEvents OnlineHilfeToolStripMenuItem As ToolStripMenuItem + Friend WithEvents UpdateToolStripMenuItem As ToolStripMenuItem + Friend WithEvents ToolStripMenuItem2 As ToolStripSeparator End Class diff --git a/Gästeliste/frmMain.vb b/Gästeliste/frmMain.vb index 310ff7b..fe82a17 100644 --- a/Gästeliste/frmMain.vb +++ b/Gästeliste/frmMain.vb @@ -1,4 +1,6 @@ Imports System.ComponentModel +Imports System.Deployment +Imports System.Deployment.Application Public Class frmMain Private _dataPath As String = System.IO.Path.Combine(My.Computer.FileSystem.SpecialDirectories.MyDocuments, "Gästeliste.xml") @@ -58,4 +60,21 @@ Public Class frmMain Private Sub OnlineHilfeToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles OnlineHilfeToolStripMenuItem.Click Process.Start("http://tmsn.at/?tools&gaesteliste&hilfe") End Sub + + Private Sub UpdateToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles UpdateToolStripMenuItem.Click + Dim Info As UpdateCheckInfo + + If ApplicationDeployment.IsNetworkDeployed Then + Dim AD As ApplicationDeployment = ApplicationDeployment.CurrentDeployment + + Info = AD.CheckForDetailedUpdate + If Info.UpdateAvailable Then + If MsgBox("Ein Update ist verfügbar, willst du jetzt aktualisieren?", vbYesNo) = vbYes Then + AD.UpdateAsync() + End If + Else + MsgBox("Es ist kein Update verfügbar.") + End If + End If + End Sub End Class