Hi i am getting this error
Invalid use of Null : Cint
in line 2 i.e If rs.Fields("CurrentInstallID").Value = "0". please help me
what may be the problem
This is my code:
If Not IsNull(rs.Fields("BuildOutputComponentID").Value) then
If rs.Fields("CurrentInstallID").Value = "0" _
Or CInt(rs.Fields("CurrentItemID").Value) = CInt(rs.Fields("DefaultItemID").Value) Then
%><%=Trim(rs.Fields("VersionNumber").Value)%> <font color="green">(Default)</font><%
elseif Cint(rs.Fields("CurrentInstallID").Value) > 0 then
'check to see if the component needs INF uploader for the specified component version
Set adoCmd = SetupProc("BuildSystem..pr_SelectExternalComponentVersionNumb er", connStandard)
AddParam adoCmd, "@externalcomponentversionid", adInteger, adParamInput, 0, Cint(rs.Fields("CurrentInstallID").Value)
Set rsNewInstallerVersion = CreateDisconnectedRS(adoCmd)
Set adoCmd = Nothing
Invalid use of Null : Cint
in line 2 i.e If rs.Fields("CurrentInstallID").Value = "0". please help me
what may be the problem
This is my code:
If Not IsNull(rs.Fields("BuildOutputComponentID").Value) then
If rs.Fields("CurrentInstallID").Value = "0" _
Or CInt(rs.Fields("CurrentItemID").Value) = CInt(rs.Fields("DefaultItemID").Value) Then
%><%=Trim(rs.Fields("VersionNumber").Value)%> <font color="green">(Default)</font><%
elseif Cint(rs.Fields("CurrentInstallID").Value) > 0 then
'check to see if the component needs INF uploader for the specified component version
Set adoCmd = SetupProc("BuildSystem..pr_SelectExternalComponentVersionNumb er", connStandard)
AddParam adoCmd, "@externalcomponentversionid", adInteger, adParamInput, 0, Cint(rs.Fields("CurrentInstallID").Value)
Set rsNewInstallerVersion = CreateDisconnectedRS(adoCmd)
Set adoCmd = Nothing