Teledyne-lecroy SAS_SATA Tracer_Trainer Automation API Manual Uživatelský manuál Strana 92

  • Stažení
  • Přidat do mých příruček
  • Tisk
  • Strana
    / 94
  • Tabulka s obsahem
  • KNIHY
  • Hodnocené. / 5. Na základě hodnocení zákazníků
Zobrazit stránku 91
LeCroy Corporation Automation API for SAS/SATATracer/Trainer Manual Version 1.11
92
Example
VBScript:
<OBJECT
ID = Analyzer
CLASSID = "clsid:0B179BB8-DC61-11D4-9B71-000102566088" >
</OBJECT>
<P ALIGN=LEFT ID=StatusText></P>
<SCRIPT LANGUAGE="VBScript">
<!--
Function GetRecordingStatus(ByVal State, ByVal Percent)
Select Case State
Case -1: GetRecordingStatus = "Idle"
Case 0: GetRecordingStatus = "Recording - Waiting for trigger"
Case 1: GetRecordingStatus = "Recording - Triggered"
Case 2: GetRecordingStatus = "Uploading"
Case 3: GetRecordingStatus = "Saving Data"
Case Else: GetRecordingStatus = "Invalid recording status"
End Select
GetRecordingStatus = GetRecordingStatus & ", " & Percent & "% done"
End Function
Dim RecordingStatus
Sub Analyzer_OnStatusReport(ByVal System, ByVal State, ByVal Percent)
Select Case System
Case 1 RecordingStatus = GetRecordingStatus( State, Percent )
End Select
End Sub
-->
</SCRIPT>
Zobrazit stránku 91
1 2 ... 87 88 89 90 91 92 93 94

Komentáře k této Příručce

Žádné komentáře