Wrox Programmer Forums

Need to download code?

View our list of code downloads.

Register | FAQ | Members List | Calendar | Search | Today's Posts | Mark Forums Read
Classic ASP Components Discussions specific to components in ASP 3.
Welcome to the p2p.wrox.com Forums.

You are currently viewing the Classic ASP Components section of the Wrox Programmer to Programmer discussions. This is a community of tens of thousands of software programmers and website developers including Wrox book authors and readers. As a guest, you can read any forum posting. By joining today you can post your own programming questions, respond to other developers’ questions, and eliminate the ads that are displayed to guests. Registration is fast, simple and absolutely free .
DRM-free e-books 300x50
 
 
Thread Tools Display Modes
  #1 (permalink)  
Old April 1st, 2008, 01:29 AM
Authorized User
 
Join Date: Jun 2006
Location: , , .
Posts: 47
Thanks: 0
Thanked 2 Times in 2 Posts
Default SAP Connection with ASP

hi all,
M working on one ASP project where i have to get data from SAP RFC Function.
I have successfully made the connection to SAP but now as soon as m adding function to sap object my system hangs no error msg nothing.
pl help wat to do...?
my code as below:
Public theFunc

Public con
Public sapObj
Dim returnFunc

Set sapObj = CreateObject("SAP.Functions")
Set sapConnection = CreateObject("SAP.Logoncontrol.1")
Set sapConnection = sapConnection.NewConnection

sapConnection.System = "00"
sapConnection.ApplicationServer = "10.27.1.252"
sapConnection.client = 300
sapConnection.user = "TMRAHIL"
sapConnection.Password = "ENGLAND1"
sapConnection.language = "EN"

'**************************************
'Log On to the SAP System
'**************************************
Set functionCtrl = server.CreateObject("SAP.Functions")
retcd=sapConnection.Logon(0,true)
If RetCd = False Then
  Response.write "SAP Logon Failed."
  Response.End
else
  Response.write "SAP Logon Succeeded."
end if

UPTO THIS MY SYSTEM WORKS FINE BUT AFTER THAT SYSTEM HANGS.
*****************************************
Set theFunc = functionCtrl.Add("ZPOMDRREP")
theFunc.Exports("EBELN") = "3019380"
returnFunc = theFunc.Call

If returnFunc = True Then
  Set docs = theFunc.tables.Item("MAT_INFO")
  Response.write "SAP Data found."
else
  Response.write "SAP Data NOT found."
end if


Komila Kalia
Software Developer
Reliance engineering Associates (P) Ltd.
__________________
Komila Kalia
Software Developer
Reliance engineering Associates (P) Ltd.
  #2 (permalink)  
Old June 17th, 2008, 11:52 AM
Registered User
 
Join Date: Jun 2008
Location: Ellicotty City, MD, USA.
Posts: 1
Thanks: 0
Thanked 0 Times in 0 Posts
Default

Hi Komila Kalia,

Good Morning!

I have to work on the classic ASP application which connects to the SAP database.

Appreciate if u can how to go about.
I wanted to do this uisng a webserice.

Kindly let me know how do i go about.

Thanks in advance

Bye,
Prasanna



Prasanna
 


Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is Off
HTML code is Off
Trackbacks are Off
Pingbacks are On
Refbacks are Off

Similar Threads
Thread Thread Starter Forum Replies Last Post
SAP connection with ASP Komila Classic ASP Professional 1 April 1st, 2008 01:33 AM
SAP R/3...wanna know more myquery Other Programming Languages 1 October 22nd, 2007 10:09 AM
SAP connection thePT Classic ASP Components 0 May 15th, 2007 12:37 PM
create functions to VisualB from SAP deedee VB How-To 0 December 5th, 2003 02:00 PM
create functions to VisualB from SAP deedee VB.NET 2002/2003 Basics 0 December 5th, 2003 01:50 PM



All times are GMT -4. The time now is 07:11 PM.


Powered by vBulletin®
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
© 2013 John Wiley & Sons, Inc.