G
Guest
Why doesn't the following function seem to work?
Function GetItemDesc(ItemNumber As String)
Set conn = Server.CreateObject("ADODB.Connection")
strConn = "DSN=AS020A"
conn.Open strConn
strQuery = "SELECT USIAJFL0.JFITDS FROM AS400.SCDBFP10.USIAJFL0 WHERE
USIAJFL0.JFITEM=ItemNumber"
conn.Execute(strQuery)
End Function
Function GetItemDesc(ItemNumber As String)
Set conn = Server.CreateObject("ADODB.Connection")
strConn = "DSN=AS020A"
conn.Open strConn
strQuery = "SELECT USIAJFL0.JFITDS FROM AS400.SCDBFP10.USIAJFL0 WHERE
USIAJFL0.JFITEM=ItemNumber"
conn.Execute(strQuery)
End Function