W
Wendell A. Clark
I have been using the form.checkbox to catch and display a database value
e.g.
'NU0603_ObsvdPrecautions
If Not (Trim(rsHHA.Fields("NU0603_ObsvdPrecautions").Value & "") = "") Then
For i = 1 To Len(Trim(rsHHA.Fields("NU0603_ObsvdPrecautions").Value &
"")) Step 1
xChng =
evalPoint(Trim(rsHHA.Fields("NU0603_ObsvdPrecautions").Value), (0 + i))
If xChng = 1 Then ActiveDocument.FormFields("Check" & 1019 +
i).CheckBox.Value = True Else ActiveDocument.FormFields("Check" & 1019 +
i).CheckBox.Value = False
Next i
End If
I have had the occassion to need to duplicate the checkbox sequences for
sub-data (detail) records Is their away to add the checkbox, question set
dynamically. Any assistance would be most welcome.
--
Wendell A. Clark, BS
CONFIDENTIALITY NOTICE: This e-mail communication and any attachments may
contain confidential and privileged information for the use of the
designated recipients named above. If you are not the intended recipient,
please notify us by reply e-mail. You are hereby notified that you have
received this communication in error and that any review, disclosure,
dissemination, distribution or copying of it or its contents is prohibited.
If you have received this communication in error, please destroy all copies
of this communication and any attachments. Contact the sender if it
continues.
e.g.
'NU0603_ObsvdPrecautions
If Not (Trim(rsHHA.Fields("NU0603_ObsvdPrecautions").Value & "") = "") Then
For i = 1 To Len(Trim(rsHHA.Fields("NU0603_ObsvdPrecautions").Value &
"")) Step 1
xChng =
evalPoint(Trim(rsHHA.Fields("NU0603_ObsvdPrecautions").Value), (0 + i))
If xChng = 1 Then ActiveDocument.FormFields("Check" & 1019 +
i).CheckBox.Value = True Else ActiveDocument.FormFields("Check" & 1019 +
i).CheckBox.Value = False
Next i
End If
I have had the occassion to need to duplicate the checkbox sequences for
sub-data (detail) records Is their away to add the checkbox, question set
dynamically. Any assistance would be most welcome.
--
Wendell A. Clark, BS
CONFIDENTIALITY NOTICE: This e-mail communication and any attachments may
contain confidential and privileged information for the use of the
designated recipients named above. If you are not the intended recipient,
please notify us by reply e-mail. You are hereby notified that you have
received this communication in error and that any review, disclosure,
dissemination, distribution or copying of it or its contents is prohibited.
If you have received this communication in error, please destroy all copies
of this communication and any attachments. Contact the sender if it
continues.