Re: COM again
| From: | Alain Samoun | Date: | Mon, 01 Oct 2001 17:36:36 +0000 |
| Subject: | Re: COM again | ||
| References: | 1 | Groups: | php.windows |
| Request: | Send a blank email to php-windows+get-9640@lists.php.net to get a copy of this message | ||
> I'm having some trouble getting around with COM objects. Is there any way
> that one can list the methods/properties of an instanciated COM object?
Read the doc if available.
>
> Also. I'm having trouble getting an ASP-script to work, so maybe someone
> could help me translate? I've been staring at it for so long that I don't
> see anymore :-)
You are not the only one ;( , what you need to do to get help:
- Provide your OS and PHP version.
- Test your system with some code that show COM connections are working (See
for example: http://www.phpbuilder.com/columns/alain20001003.php3
- Provide the VB or ASP code if available, as you did.
- Provide the PHP code that you have tested.
Now, regarding the ASP code, it seems that it is invoked via a DCOM
connection, DCOM should be enabled when compiling the PHP version that you
are using. You may also want to have a look at the ADODB code from John Lim:
http://php.weblogs.com/com_php
Alain
>
> (And of course, good links appreciated)
>
> -Jørg
>
> ---
> <%
>
> '
> ' Logon to the Axapta COM interface
> '
> Set Axapta = Server.CreateObject("AxaptaConnector.Axapta")
> Axapta.Logon "usah", "pass", "level", ""
>
> '
> ' run Query
> '
> Set myRecord = Axapta.CreateRecord("CustTable")
> Axapta.ExecuteStmt "select * from %1 where %1.Name == '" &
> Request.Form("Username") & "' && %1.WebPassword == '"
> &
> Request.Form("Password") & "'",myRecord
>
> '
> ' Show result
> '
> if myRecord.Found then
> Session("AccountNum") = myRecord.Field("AccountNum")
> if Request.Form("ID")<>"" then
> Response.Redirect "/public.asp?id=" & Request.Form("PageID")
> else
> Response.Redirect "/public.asp?keyword=memberpage"
> end if
> else
> Response.redirect "/retry.asp?ERR=" & Server.URLEncode("Bad
> username")
> end if
>
> Axapta.Logoff
> Set Axapta = Nothing
>
> %>
> ---
>
>
>
> --
> PHP Windows Mailing List (http://www.php.net/)
> To unsubscribe, e-mail: php-windows-unsubscribe@lists.php.net
> For additional commands, e-mail: php-windows-help@lists.php.net
> To contact the list administrators, e-mail: php-list-admin@lists.php.net