ebizsalman
MIS
Hi,
i am creating a PO in the table POB_VendorPurchaseAddress but gives me error.Can any one tell me that are we allowed to create a record in MAS90 with insert query.
i am writing the following code
Dim dsn As String = "SOTAMAS90"
Dim timeout As String = "360"
' Build the connection string
dbConnStr = "DSN=SOTAMAS90; Directory=C:\Program Files\Sage Software\MAS 90\Version4\MAS90; Prefix=C:\Program Files\Sage Software\MAS 90\Version4\MAS90\SY\, C:\Program Files\Sage Software\MAS 90\Version4\MAS90\==\; ViewDLL=C:\Program Files\Sage Software\MAS 90\Version4\MAS90\HOME; LogFile=\PVXODBC.LOG; CacheSize=4; DirtyReads=1; BurstMode=1; StripTrailingSpaces=1; SERVER=NotTheServer"
If (dbConn Is Nothing) Then
Try
dbConn = New OdbcConnection(dbConnStr)
dbConn.ConnectionTimeout = timeout
dbConn.Open()
dbError = Nothing
Catch ex As Exception
dbError = ex
dbConn = Nothing
End Try
Dim COMMANDD As New OdbcCommand
Dim DATAADAPTER As New OdbcDataAdapter
Dim DATSET1 As New DataSet
COMMANDD.Connection = dbConn
COMMANDD.CommandType = CommandType.Text
COMMANDD.CommandText = "insert into POB_VendorPurchaseAddress values('01' ,'COMPAQ','NY','COMPAQ COM','7829 E. 47TH STREET','','','','','','','','','','','','')"
Try
COMMANDD.ExecuteNonQuery()
Catch ex As Exception
MsgBox(ex.ToString)
End Try
COMMANDD.Connection.Close()
End If
i am creating a PO in the table POB_VendorPurchaseAddress but gives me error.Can any one tell me that are we allowed to create a record in MAS90 with insert query.
i am writing the following code
Dim dsn As String = "SOTAMAS90"
Dim timeout As String = "360"
' Build the connection string
dbConnStr = "DSN=SOTAMAS90; Directory=C:\Program Files\Sage Software\MAS 90\Version4\MAS90; Prefix=C:\Program Files\Sage Software\MAS 90\Version4\MAS90\SY\, C:\Program Files\Sage Software\MAS 90\Version4\MAS90\==\; ViewDLL=C:\Program Files\Sage Software\MAS 90\Version4\MAS90\HOME; LogFile=\PVXODBC.LOG; CacheSize=4; DirtyReads=1; BurstMode=1; StripTrailingSpaces=1; SERVER=NotTheServer"
If (dbConn Is Nothing) Then
Try
dbConn = New OdbcConnection(dbConnStr)
dbConn.ConnectionTimeout = timeout
dbConn.Open()
dbError = Nothing
Catch ex As Exception
dbError = ex
dbConn = Nothing
End Try
Dim COMMANDD As New OdbcCommand
Dim DATAADAPTER As New OdbcDataAdapter
Dim DATSET1 As New DataSet
COMMANDD.Connection = dbConn
COMMANDD.CommandType = CommandType.Text
COMMANDD.CommandText = "insert into POB_VendorPurchaseAddress values('01' ,'COMPAQ','NY','COMPAQ COM','7829 E. 47TH STREET','','','','','','','','','','','','')"
Try
COMMANDD.ExecuteNonQuery()
Catch ex As Exception
MsgBox(ex.ToString)
End Try
COMMANDD.Connection.Close()
End If