Laden einer S-Parameterdatei von einem PC in eine Speicherkurve

Frage

Ich habe eine S-Parameterdatei auf meinem PC und möchte sie in eine Speicherkurve meines Netzwerk-Analysators laden.

Wie kann ich das per Fernsteuerung tun?

Antwort

Sie brauchen das hier bereitgestellte Programm, das in VisualBasicApplication unter EXCEL geschrieben wurde.

Wenn Sie einen NI-VISA-Treiber installiert haben und eine GPIB- oder TCP/IP-Verbindung zum Netzwerk-Analysator besteht, können Sie das Programm selbst ausführen.

Das Programm sucht nach der Datei TEST.S1P in 'C:\Work\'.

Der folgende Teil ist der wichtige Teil:

Rem S-Parameterdatei Test.S1P öffnen und Inhalte lesen

Set fs = CreateObject("Scripting.FileSystemObject")

Set f = fs.GetFile("C:\work\Test.S1P")

Rem s ist die Anzahl der Bytes in den Daten der Datei Test.S1P

s = f.Size

Open "C:\work\Test.S1P" For Input As #1

Do While Not EOF(1)

Text1 = Input(s, #1)

Loop

Close #1

Rem Daten erstellen, die zum ZVL gesendet werden sollen

Rem l ist die Anzahl der Bytes, die für die Längeninformationen der Daten benötigt werden

l = Len(s)

Text2 = "#" + CStr(l) + CStr(s) + Text1

Rem Daten in einer Datei zum ZVL senden

commandStr = "MMEMory:DATA 'C:\Temp\Test.S1P', " + Text2

countsend = Len(commandStr)

status = viWrite(vinstr, commandStr, countsend, count)

Rem Datei in einer Speicherkurve öffnen

commandStr = "MMEM:LOAD:TRAC 'TRC1','c:\temp\test.s1p'"

countsend = Len(commandStr)

status = viWrite(vinstr, commandStr, countsend, count)