09-22-2005 10:06 AM
With Channels(ChannelCount)
If Not mod1TaskCreated(0) Then
Tasks(0) =
New Task("mod1task")mod1TaskCreated(0) =
True End If Select Case Channels(ChannelCount).Type Case Is = "Temperature"Tasks(0).AIChannels.CreateThermocoupleChannel(.Device & "/" & .Channel, .Name, _
.Min, .Max, AIThermocoupleType.K, AITemperatureUnits.DegreesF)
Tasks(0).AIChannels(.Name).AutoZeroMode = AIAutoZeroMode.None
Tasks(0).AIChannels(.Name).LowpassEnable =
TrueTasks(0).AIChannels(.Name).LowpassCutoffFrequency = 4
Case Is = "Voltage"Tasks(0).AIChannels.CreateVoltageChannel(.Device & "/" & .Channel, .Name, AITerminalConfiguration.Differential, _
.Min, .Max, AIVoltageUnits.Volts)
Tasks(0).AIChannels(.Name).AutoZeroMode = AIAutoZeroMode.None
Tasks(0).AIChannels(.Name).LowpassEnable =
TrueTasks(0).AIChannels(.Name).LowpassCutoffFrequency = 4
Case ElseMsgBox("Error in channel configuration!", MsgBoxStyle.Critical, "Warning!")
System.Console.WriteLine("Error in Channel Configuration. Abort.")
Exit Sub End Select End WithChannelCount += 1
End WhileTasks(0).Timing.ConfigureSampleClock("", 10000, SampleClockActiveEdge.Rising, SampleQuantityMode.FiniteSamples, 1000)
Tasks(0).Control(TaskAction.Verify)
reader =
New AnalogMultiChannelReader(Tasks(0).Stream)Task1Data = reader.ReadMultiSample(1000)
************************************************************************************************************************************
Thanks.
09-23-2005 08:54 AM
dvc = DaqSystem.Local.LoadDevice("SC1Mod1")
dvc.Reset()
09-23-2005 09:53 AM
For discussion of why this situation arises please see this thread.
Thanks-
09-23-2005 10:14 AM
09-23-2005 10:15 AM
Not a problem- let us know if you run into anything else.
Thanks again!