Bonjour,
Je souhaite intégrer viewen Inventor dans une page web.
J'ai consulté la rubrique d'aide et voici ce qu'on peut y lire :
Citation :
Incorporation d'Autodesk Inventor View dans un fichier HTML
Utilisez le libellé <object> pour incorporer Autodesk Inventor View et référencer une pièce dans un fichier HTML. Vous pouvez ensuite la visualiser à partir d'Internet ou d'un intranet.
RemarqueMicrosoft Internet Explorer 5.01 ou ultérieur est requis.
1/Créez un fichier HTML comme à votre habitude.
2/Définissez les commandes à l'aide du libellé <param> HTML. Cela permet de définir les propriétés de personnalisation des boutons destinés au redimensionnement de la fenêtre de contrôle, au changement du mode d'affichage et à l'ouverture des fichiers.
RemarqueIl est recommandé d'utiliser le libellé <param> pour définir les propriétés au lieu des les ajouter à l'URL ou au chemin. Parfois, il est possible en effet que votre navigateur supprime les paramètres ajoutés.
3/Utilisez le paramètreclassid du libellé <object> pour incorporer Autodesk Inventor View dans le fichier. Votre fichier HTML doit être défini comme suit :
<object classid="CLSID:A6336AB8-D3E1-489A-8186-EE40F2E027FE" id=ViewerControl1>
4/Configurez les propriétés API pour contrôler le fichier dans la page Web.
Lors de la définition des paramètres height et width dans une page HTML, il est recommandé d'utiliser des valeurs statiques plutôt que des pourcentages. Si vous utilisez des pourcentages et que vous redimensionnez la fenêtre du navigateur, le fichier sera déformé à l'impression.
|
exemple de code
Citation :
<HTML>
<HEAD><TITLE>Test Viewer Control</TITLE></HEAD>
<BODY>
<FORM ID="TestForm" LANGUAGE="VBScript">
<table style-class="BORDER-COLLAPSE: collapse" cellSpacing=0 cellPadding=0 border=1><tr><td>
<blockquote>
<BOLD>File:</BOLD>
<input type="file" size="40" NAME="BrowseFile"></td></tr>
<tr><td align=right><INPUT NAME="OpenButton" TYPE="Button" VALUE="Open"></td></tr>
<tr><td><INPUT NAME="PerspectiveButton" TYPE="Button" Value ="Perspective">
<INPUT NAME="LargerButton" TYPE="Button" VALUE="Larger">
<INPUT NAME="SmallerButton" TYPE="Button" VALUE="Smaller"> <INPUT name="cbInteractive" value ="Interactive" type="CheckBox">Interactive</td></tr>
<tr><td><INPUT NAME="ShadedButton" TYPE="Radio"> Shaded View
<INPUT NAME="HiddenButton" TYPE="Radio"> Hidden Line
<INPUT NAME="WireframeButton" TYPE="Radio"> Wireframe</td></tr></table></blockquote>
</FORM>
<object classid="CLSID:A6336AB8-D3E1-489A-8186-EE40F2E027FE" id=ViewerControl1 width=400 height=300>
<param name="_Version" value=65536> <param name="_ExtentX" value=13229>
<param name="_ExtentY" value=7938> <param name="_StockProps" value=0>
</object>
<SCRIPT LANGUAGE="VBScript">
Sub PerspectiveButton_OnClick()
Dim TheForm
Set TheForm = Document.Forms("TestForm" )
If ViewerControl1.Perspective Then
TheForm.PerspectiveButton.Value = "Orthographic"
ViewerControl1.Perspective = False
Else
TheForm.PerspectiveButton.Value = "Perspective"
ViewerControl1.Perspective = True
End If
End Sub
Sub LargerButton_OnClick()
ViewerControl1.Width = ViewerControl1.Width * 1.1
ViewerControl1.Height = ViewerControl1.Height * 1.1
End Sub
Sub SmallerButton_OnClick()
ViewerControl1.Width = ViewerControl1.Width * 0.9
ViewerControl1.Height = ViewerControl1.Height * 0.9
End Sub
Sub OpenButton_OnClick()
Dim TheForm
Set TheForm = Document.Forms("TestForm" )
ViewerControl1.Filename = TheForm.BrowseFile.Value
TheForm.ShadedButton.checked = true
TheForm.cbInteractive.checked = true
End Sub
Sub ShadedButton_OnClick()
Dim TheForm
Set TheForm = Document.Forms("TestForm" )
TheForm.HiddenButton.checked = False
TheForm.WireframeButton.checked = False
ViewerControl1.DisplayMode = 8708
End Sub
Sub HiddenButton_OnClick()
Dim TheForm
Set TheForm = Document.Forms("TestForm" )
TheForm.ShadedButton.checked = False
TheForm.WireframeButton.checked = False
ViewerControl1.DisplayMode = 8707
End Sub
Sub WireframeButton_OnClick()
Dim TheForm
Set TheForm = Document.Forms("TestForm" )
TheForm.ShadedButton.checked = False
TheForm.HiddenButton.checked = False
ViewerControl1.DisplayMode = 8706
End Sub
Sub cbInteractive_OnClick()
Dim TheForm
Set TheForm = Document.Forms("TestForm" )
if TheForm.cbInteractive.checked = False then
ViewerControl1.Interactive = false
else
ViewerControl1.Interactive = true
end if
End Sub
</SCRIPT>
</BODY></HTML>
|
J'ai insérer le code dans une page web http://www.via-creation.serveftp.com/essaie.html , j'ai cliquez sur parcourir, choisi un fichier mais il ne s'ouvre pas. Je pense que c'est en rapport avec le point 4 : 4/Configurez les propriétés API pour contrôler le fichier dans la page Web.
Pourriez vous m'aider ?
merci
Message édité par Positiviste le 11-04-2008 à 12:23:35
---------------
ploum ploum tralala
FORUM HardWare.fr
