Pb avec Window.close()

Version imprimable

21/01/2008, 09h08
olivierlsf

Pb avec Window.close()
Bonjour,

j'ai des difficultés avec la fermeture de ma page
Code:

1 2 3 window.opener=null window.close()
voir même

Code:

self.close

ne fonctionne pas lorsque la page est sous reseau (en site de confiance)

alors que cette fonction est ok lorsque je suis en poste de travail ...

Pour la config. Ie, elle est identique en poste de travail et en site de confiance

Quelqu'un aurait une petite idée svp ... ??

merci par avance
21/01/2008, 09h52
ced600

Postes tout ton code, et dis nous ce que tu fais.

ced .. merci

Le code :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
<img border="0" src="C:\Program Files\Actaris\Image\21556.gif" width="190" height="70"></p>
<div align="left" style="width: 934; height: 535">
 
 
<form method="POST" name="Form">
<table border="0" width="980"
<tr>
<tr>
<td valign="top" width="410" height="29"> </td>
<td valign="top" width="386" align="center" height="29" colspan="2"><font face="Arial" size="5"><u>ETIQUETTE</u></font> </td>
<td valign="top" width="300" height="29"> </td>
<tr>
<td valign="top" width="410"> </td>
<td valign="top" width="386" colspan="2"> </td>
<td valign="top" width="300"> </td>
<tr>
<td valign="top" width="410"> </td>
<td valign="top" width="1"> </td>
<td valign="top" width="439"><font face="Arial" size="4"><i>Description</i></font><br><input type="text" size=25 name="Desc"> </td>
<td valign="top" width="300"> </td>
<tr>
<td valign="top" width="410"> </td>
<td valign="top" width="76"> </td>
<td valign="top" width="310"><i><font face="Arial" size="4">Référence</font></i><br><input type="text" size=20 name="Ref"> </td>
<tr>
<td valign="top" width="410"> </td>
<td valign="top" width="76"> </td>
<td valign="top" width="310"><font face="Arial" size="4"><i>Quantité par emballage</i></font><br><input type="text" size=25 name="Quantite"> </td>
<tr>
<td valign="top" width="410"> </td>
<td valign="top" width="76">
 </td>
<td valign="top" width="310"><font face="Arial" size="4"><i>Quantité étiquette(s)</i></font><br><input type="text" size="5" name="LAB_QUANTITY" value="1" </td>
 </td>
</table><br><br>
<table border="0" width="100%"<tr><td></table>
<BR><BR>
<div align="center"><center><font size="2" face="Arial">Imprimante </font>
<select SIZE="1" name="PrnList" Align = "baseline" border = "0" Width = "217" Height = "24" > 
	<option> Zebra Z4000 (300dpi),LPT1: </option> 
 
 
 
  </select>
 
<BR><BR>
 
  <table>
    <tr>
 
<td valign="top" width="472" align="center" height="2"><center>
  <font size="3">
<input type="button" name="CSCtrl" Width="400" Height="500"
value="IMPRESSION" style="position: relative; width: 213; height: 54; font-family: Arial; font-weight: bold">
  </font>
</center> </td>
 
 
<BR><BR>
 
 
 
<td valign="top" width="431" height="36"> <center>
  <font size="3">
<input type="button" name="CSCtrlQUITTER" Width="400" Height="500"
value="QUITTER"  style="position: relative; width: 179; height: 53; font-family: Arial; font-weight: bold">
  </font>
</center> </td>
 
 
</form>
    </table>
  </center>
  </div>
</div>
</body>

l'interface gère l'impression d'etiquette ....

Et le bouton Quitter permets à d'arreter de sortir de l'écran d'impression ....

Cette interface fonctionne en 'Poste de travail' - mais en site de consiance 'localHost' je ne peux pas sortir de l'interface ... le bouton quitter ne fonctionne pas .. pas de message d'erreur non plus ...

21/01/2008, 14h20
ced600

Ce n'est pas du code vbs c'est du code HTML.
Où est ton code VBS ?

window.close

Désolé j'ai raté mon copier coller ....:oops:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
<script language="VBScript"><!--"
dim CSOBJ
Sub Window_onLoad()
	set CSOBJ = CreateObject("TkxBridge.Application")
End Sub
 
 
Sub Window_onUnload()
	CSOBJ.Quit
	set CSOBJ = Nothing
End Sub
 
 
Sub CSCtrl_onClick()
Dim doc
Dim Choice
 
 
	CSOBJ.Connect "HTML Form Generator"
	CSOBJ.OpenDocument "c:\progra~1\actaris\etique~1\kit.lab" 
	Choice =  Form.PrnList.selectedIndex 
	CSOBJ.SelectPrinter Form.PrnList.Options(Choice).Text
 
 
	CSOBJ.SetVariable "Desc", Form.Desc.Value
	CSOBJ.SetVariable "Quantite", Form.Quantite.Value
	CSOBJ.SetVariable "Ref", Form.Ref.Value
 
 
	CSOBJ.PrintDocument Form.LAB_QUANTITY.Value, "1", "1"
End Sub
 
sub CSCtrlQUITTER_onClick() 
  opener=null 
  close()
end sub  
 
--></script>

21/01/2008, 15h21
ced600

Bon c koi le problème ?
Une exception ?
Cela ne se ferme pas ?

Qu'est ce que opener ?
21/01/2008, 16h20
olivierlsf

Citation:

Bon c koi le problème ?
Une exception ?
Cela ne se ferme pas ?

Qu'est ce que opener ?

le formulaire se ferme pas et

opener est une astuce pour eviter d'avoir le message de confirmation window lors je click sur quitter
21/01/2008, 18h08
ced600

opener est plus une propriété qu'une astuce je pense :mrgreen:

Close doit certainement appelé un event auquel Window_onUnload réagis.
Met une msgbox dans Window_onUnload pour voir si tu passes dedans.
22/01/2008, 09h08
olivierlsf

pb avec window.close

Cell, j'ai ajouté un msgbox dans le Window_onUnload qui reagit bien lorsque que l'on actualise la page ... mais c'est tous - pas de fermeture

pour le coup j'ai aussi ajouté un autre msgbox dans
le CSCtrlQUITTER_onClick avant le close() et j'obtient bien le message
22/01/2008, 09h41
ced600

Bon bah faudrait qu'un gars qui connaisse un peu la prog wen en vbs passe dans le coin.
Parce que ce n'est pas mon cas, et tu dois certainement te tromper dans l'utilisation des méthodes.
Tu as été voir l'aide pour savoir si tu faisais les choses correctement ?
22/01/2008, 11h00
olivierlsf

pb window.close

ced ... ben oui parfaitement d'accord

Citation:

Bon bah faudrait qu'un gars qui connaisse un peu la prog wen en vbs

et si il y
22/01/2008, 11h01
olivierlsf

et si il y a une autre solution ... pour sortir du formulaire je suis preneur ....
23/01/2008, 15h22
olivierlsf

window.close

Cell je passe en resolu - pas de solution en mode localhost - je me suis penché sur le mode local et le même code fonctionne bien ...

ceci-dis ..... merci pour ton aide