I am using Microsoft Access 2007 and using a Web Browser Control on a form. I am writing data from text fields on the form to the form inside the web browser control. The following scenario works fine using the following code: “i.e. MedID on Access form goes to Web Form id_mediciad”
<tr><td title="Member ID" nowrap="nowrap">Member ID*</td><td style="padding-left: 4px">
<input datafld="sak_recip" size="10" id="input_sak_recip" disabled="disabled" style="display: none" /><table datasrc="#RequestIsland" datafld="physHdrKey" style="display: inline"><tr><td>
<input datafld="rid" size="13" maxlength="12" onchange="handleRecipientPhys(this);"id="id_medica id" /></td> </tr></table></td></tr>
Private Sub cmdSetHTMLClaim_Click()
Dim data As String
If IsNull(Me.MedID) Then
data = ""
Else
data = Me.MedID
End If
SetBrowserData "SetTextboxValue", data
End Sub
Private Sub SetBrowserData(ByVal FunctionName As String, ByVal data As String)
wbInstance.Document.GetElementByID("id_medicaid"). Value = data
While wbInstance.Busy
DoEvents
Wend
End Sub
My problem is when I try the same code and try to write data to the datafld=”cde_diag” it does not work. Do you have any ideas of how to do this or what I am doing wrong?
<table id="diag">
<thead /><tr><td valign="top"> <div style="margin-top: 6px">Diagnosis</div></td><td> <div style="height: 115px; overflow-y: auto" class="clsCollapsed"><table border="0" dataFld="diag_xref" dataSrc="#RequestIsland"><tbody><tr> <td nowrap="nowrap"> <select size="1" datafld="seq">
<option value="1">Principle</option>
<option value="2">Other 2</option>
</select></td><td align="center"><input datafld="sak_diag" style="display: none" /><input datafld="cde_diag" size="5" maxlength="5" onchange=" validateAndAddNewRow( this, diagnosisLookup, diag_IslandObj, 'seq' ); " /></td></tr></tbody></table></div></td></tr></table>