Bonjour à tous,
Mon problème est le suivant :
Je dois exécuter du code coté client (VBScript) qui ouvre un Visualisateur de molécule côté client pour afficher des molécules qui se trouvent dans le GridView.
Le GridView affiche les noms des molécules et contient un bouton sur chaque ligne.
Quand je clique sur un bouton , je voudrais lancer le VBscript côté client qui ouvre la bonne molécule dans le Visualisateur de molécule.
Comment faire ?
Voici mon code; mais il ne compile pas :
<scriptlanguage="VBScript">
window.resizeto 310,700
window.moveto 25,25
' Create an instance of the event sink.
Set snk = CreateObject( "Tripos.DynamicEventSink" )
snk.MoleculeAdd = GetRef( "OnMoleculeAdd" )
snk.MoleculeRemove = GetRef( "OnMoleculeRemove" ) ' Now hook up the event sink with the event source.
Set app = CreateObject( "Lithium.Application.1" )
Set mdl = app.ActiveModel
Call snk.Advise(mdl) Sub
LoadMolecule(filename2)
app.Visible= True
' point to files in my local installation
filename = "C:\Bench3DExplorer\20080226\Http\Web_Interaction2\" + filename2
Call mdl.ImportFile(fileName)
Call mdl.Views(1).UpdateChanges End
Sub
</ script > < asp : gridview id ="GridView2" AutoGenerateColumns = "false" runat ="server" datasourceid ="ObjectDataSource1" AllowPaging ="True" AllowSorting ="True" DataKeyNames ="Name" onrowcommand ="GridView2_RowCommand" onrowcreated ="GridView2_RowCreated">
< Columns >
< asp : BoundField DataField ="Name" HeaderText ="Name" InsertVisible ="False" ReadOnly ="True" SortExpression ="Name" />
< asp : BoundField DataField ="Gif" HeaderText ="Gif" InsertVisible ="False" ReadOnly ="True" SortExpression ="Gif" />
< asp : BoundField DataField ="Pdb" HeaderText ="Pdb" InsertVisible ="False" ReadOnly ="True" SortExpression ="Pdb" />
< asp : ImageField NullImageUrl ="~/Image/Null.JPG" HeaderText ="Gif" DataImageUrlField ="Gif" ></ asp : ImageField >
< asp : buttonfield buttontype ="Image" ImageUrl ="~/B3d/green.jpg" commandname ="B3DDisplayMol" onclick ="LoadMolecule( <%= Pdb %> ) />
< asp : buttonfield buttontype ="Link" Text = "Hide" commandname ="B3DHideMol" />
</ Columns > Merci beaucoup pour vos réponses.
Laurent