PHP-File in VBScript umschreiben

  • VBScript

Es gibt 16 Antworten in diesem Thema. Der letzte Beitrag () ist von J.Herbrich.

    PHP-File in VBScript umschreiben

    Hallo zusammen,

    Ich habe eine Frage bezüglich PHP-File umschreiben in VBScript.
    Ich kenne mich leider nicht gut aus in PHP, und bin Anfänger in VBScript.

    Wir nutzen ein Webbasiertes Buchhaltungsprogramm, welches eine REST API zur Verfügung stellt, um Daten auszulesen.
    Die Example-Files sind in PHP geschrieben und zeigen mir die Resultate der abfrage im Browser.

    Nun würde ich aber das Ganze gerne in VBScript schreiben und wollte fragen, ob es überhaupt möglich ist eine PHP-File 1zu1 in VBScript zuschreiben?
    Es gibt Example-Files welches sich auf cURL oder OAuth 2.0 beziehen.

    Grüsse
    OVOXO

    Ahoi,

    eine PHP-Basierte Webanwendung in VBScript 1 zu 1 zu übertragen sollte nicht möglich sein, da PHP eine "komplexe" Sprache ist und VBScript halt eine Script-Sprache. Was du benötigst, wäre ASP oder besser noch ASP.NET. VBScript kannst du eher mit JavaScript vergleichen.
    Grüße Manu

    Was Gott dem Menschen erspart hat, kann der Computer.
    Billy ©, (*1932), Schweizer Aphoristiker
    Quelle: www.Aphorismen.de

    Hallo,

    Ich denke du solltest einfach eine Referenz zusammen suchen und dann 1 zu 1 in ASP.NET VB Übertragen. Visual Basic Scritpt wird zwar nicht in Web Verwendet (Server Seitig) aber Client Seitig können durchaus Visual Basic Scritpt Programme ausgeführt werden, doch so weit ich weiß macht nur der IE Sowas.

    Desweiteren würde ich PHP ehr nach C# ersetzen weil beide srachen eine gewisse C Basis haben. In ASP.NET Kannst du sonst auch Visual Basic Scripte definieren (Inline Coode) aber du wirst dann den runat="server" atribute tag setzen müssen.

    Altanativ wen es QaD (Quick and Dirty) sein soll dann kannst du auch in <% %> inline coode Tags schreiben, besser währe es aber natürlich auch dann wen man sich einfach darum kümmern würde dass alles in aspx.vb datein untergebracht wird da diese Datein einfcher zu bedinenen sind und so UI und Source sauber getrennt sind.

    LG, J.Herbrich

    Danke für deine Antwort.

    Das Problem ist, dass mir die PHP-Lösung die Daten als eine Seite darstellt.
    Mein Ziel ist es, die erhaltenen Daten in Variablen zu speichern, diese dann auszuwerten und in eine DB speichern.
    Diese Auswertung muss täglich passieren, daher dachte ich VBScript ist die richtige Lösung.

    Hallo,

    Kannst du nicht einfachach eine Windows Anwendung mit VB.NET machen die dann wiederum in die DB Schreibt.

    Ich eine wen dass so ist woher kommen die Daten? Wen du direkt auf die Datenquelle gehen kannst dann schreib den zugang in dein neues Programm und schreibe dann von diesen aus in die DB.

    Dass 1x Täglich kannst du endweder mit einen Cron Job (Weiß nicht mehr Wie es unter Windows heißt aber ich glaube die nenen es dort gelahnten Task.

    LG, J. Herbrich

    Danke für eure Antworten.

    Leider bin ich ein bisschen verwirrt, wie ich nun diese Aufgabe lösen soll.
    So wie es verstanden habe, ist ASP.NET die Lösung.
    Soweit ich sehe ist ASP.NET etwas ähnliches wie PHP nur von Microsoft.

    Daher weiss ich nicht ob dies die richtige Lösung ist.
    Da ich die Daten nur darstellen will, sondern in eine andere DB speichern.

    Die Daten werden im PHP-File via URL aufgerufen, welches sich im Code je nach Kriterien zusammenstellt.
    Die URL führt dann die eigentliche SQL-Abfrage auf einem Server aus und liefert mir die Daten zurück.
    Daher habe ich keinen Zugang zur DB.

    Wenn die Daten vom php-Server von der Datenbank geholt werden und Du keinen direkten Zugriff auf die Datenbank hast, nutzt Dir keine Script-Sprache was ohne den Webserver dazwischen. Also die Daten per VBScript vom Server holen und dann halt die zurückgegebene Seite entsprechend 'zu Fuss' parsen und so an die nötigen Daten kommen. Ändert sich irgedwann der Aufbau Serverseitig, dann muss auch Dein Script wieder angepasst werden. Es sei denn die Seite bieten noch eine API an.

    PHP wird auf dem Server, welcher den Datenbankzugriff hat, ausgeführt. VBScript auf dem Clienten ohne Datenbankzugriff. Somit nutzen Dir die PHP-Beispiele auf dem Clienten nichts. Anders sieht es aus, wenn Du z.B. per Netzwerk auch direkten Zugriff auf die DB und entsprechende Zugangsdaten hast. Dann kannst Du die Abfrage 'direkt' im Script ausführen.

    Je mehr Details Du bekannt gibst, um so bessere Antworten können wir liefern. Evtl. hilft es schon nach dem geheimnisvollen Buchhaltungsprogramm zu googlen. Vielleicht gibt es auch ein Hersteller- / Communityforum dafür.
    Gruß
    Peterfido

    Keine Unterstützung per PN!

    Naja ich frage mal anders.
    Dieser Code ist in PHP geschrieben.
    Wie ich es verstanden habe, kann ich den Code 1zu1 in ASP.NET schreiben und im ASP.NET-Code, VBScript einfliessen lassen.
    Der Grund warum ich VBScript nutzen will/muss ist, das die Daten welche mir die PHP-Files liefern über eine Schnittstelle in die Datenbank einer anderen Software.
    Die andere Software bietet eine API an, welche man mit VBScript ansprechen kann um die Daten zu überliefern.
    Die Schnittstelle welche in VBScript geschrieben wurde, steht bereits.
    Daher ist mein eigentliches Ziel, die erhaltenen Daten der VBScript-Schnittstelle zu überliefern.

    PHP-Quellcode

    1. <?php
    3. require_once dirname(__FILE__) . "/Curl.class.php";
    5. class OAuth2 {
    7. protected $client_id = null;
    8. protected $client_secret = null;
    10. public function __construct($client_id, $client_secret = null) {
    11. $this->client_id = $client_id;
    12. $this->client_secret = $client_secret;
    13. }
    15. public function getAuthenticationUrl($auth_endpoint, $redirect_uri, $state, $scopes) {
    16. $parameters = array(
    17. 'client_id' => $this->client_id,
    18. 'redirect_uri' => $redirect_uri,
    19. 'state' => $state,
    20. 'scope' => $scopes,
    21. );
    23. return $auth_endpoint . '?' . http_build_query($parameters, null, '&');
    24. }
    26. public function getAccessToken($token_url, $access_code, $redirect_uri) {
    27. $postFields = array('client_id' => $this->client_id,
    28. 'client_secret' => $this->client_secret,
    29. 'code' => $access_code,
    30. 'redirect_uri' => $redirect_uri
    31. );
    33. $curl = new Curl();
    34. $result = $curl->call($token_url, array(), $postFields, Curl::METHOD_POST);
    35. return json_decode($result, true);
    36. }
    38. }
    39. ?>

    Hallo,

    Nehe doch einfach den BizTalk Server oder die SQL-Tranformation Services, Wen du umbedingt selber machen willst. Das H Scrit nutzt curl weswegen ich davon ausgehe das es zwar Daten holt aber die DB nicht direkt ansricht.

    Ich würde also sagen du kannst dass Teil ohne Probleme in ASP.NET übersetzen, aber für dein Vorhaben ist eine CMD Anwendung mit Gelahnten Task besser geeignet.

    Die Überlegung ist einfach nur folgende, du hast eine ASP.NET Seite die immer in täglichen Intervallen aufgerufen werden muss damit du die Daten von einer DB in die andere Kriegst. ASP.NET ist aber darfür gedacht direkte Zugriffe (Mensch oder Maschine (API)) zu verarbeiten. ASP.NET Kann aber selbstständig nicht ausgeführt werden ohne einen Trigger Request zu erhallten der die Web Handler im IIS Anstößt.

    Zu deinen PHP-Script kann ich ebenfalls nur sagen dass du die Daten direkt abgreifen kannst, ich werde mir mal diese PHP genauer ansehen und wen ich lust habe schreibe ich dir den Coode wie du die Daten abfragen kannst. Wen nicht sage ich dir auf jednen Fall was zu tun ist.

    EDIT: Dass sieht mir nicht nach Datenbank aus sondern nach API zugriff (oauth), so wie ich es hier sehe versucht die eine sogenannte REST-API anzuzafen. Da werde ich den ganzen restlichen Coode brauchen um da durch zu steigen.

    Worum geht hier ist eigentlich denn, Facebook ist es nicht, Google vieleicht? Oder eine kleinere API, was Netzwerk Internes wohl ehr nicht, weil der Coode nach Internet Dienst einer großen Website aussieht.

    LG, J.Herbrich

    Hallo,

    Genau dass Predige ich ja immer, ich kann dir Persönlich Visual Basic nahe legen aber die CMD ist genau der Richtige Weg, du wählst in Visual Studio einfach Console Aplication aus und als Sprache VB,

    cUrl = WebClient
    json kannst du mit DatenVerträgen (System.Runtime.Serialisation verweisen und dann Data Contract (Datenvertrag) setzen.

    VB.NET-Quellcode

    1. ​
    2. Import System.Runtime.Serialisation
    3. Import System.Runtime.Serialisation.Json
    5. <DataContract()> _
    6. Public Class MyDataContract
    7. <datamember()> Public Propety MyDataMember as MyType
    8. ' MyType = {String,Integer,Boolean,Object,MyClassMustUseDataContract)
    9. end Class


    Und was die Functionen angeht denke ich nicht dass du da all zu viele Probleme bekommen solltest.

    LG, J.Herbrich

    Gutte Frage, dass ist er ein Persönliches ding, ich finde VB.NET Ordentlicher. Aber vb.net und C# sind dass selbe, denn beides wird auf CLR Übersetzt und würde Theoretisch sogar die exakt selbe exe Produzieren. Ich fide vb.net ist einfach einfacher (MyNamesace) die denn Zugriff auf Wesentliche Funktionen einfach vereinfcht.

    LG, J.Herbrich

    Geht auch problemlos mit VB Script.
    Beispiel für einen POST Request von einer anderen Webseite:

    Visual Basic-Quellcode

    1. ​
    2. 'URL to open....
    3. sUrl = "http://www.example.com/page.php"
    4. 'POST Request to send.
    5. sRequest = "varname=value&varname=value"
    6. HTTPPost sUrl, sRequest
    8. Function HTTPPost(sUrl, sRequest)
    9. set oHTTP = CreateObject("Microsoft.XMLHTTP")
    10. oHTTP.open "POST", sUrl,false
    11. oHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
    12. oHTTP.setRequestHeader "Content-Length", Len(sRequest)
    13. oHTTP.send sRequest
    14. HTTPPost = oHTTP.responseText
    15. End Function
    Das ist meine Signatur und sie wird wunderbar sein!

    Ich habe mich dafür entschieden, dass ganze als eine C# Konsolenanwendung zu programmieren.
    Da ich praktisch keine Erfahrung in C# habe, wäre ich sehr froh wenn mir jemand als Hilfe einen Code teil umgeschrieben zeigen könnte.
    Mir würde es schon reichen wenn ich ein Beispiel der ersten Funktion "call" hätte.

    PHP-Quellcode

    1. <?php
    3. class Curl {
    5. const METHOD_GET = 'GET';
    6. const METHOD_POST = 'POST';
    7. const METHOD_PUT = 'PUT';
    8. const METHOD_DELETE = 'DELETE';
    10. const CURL_TIMEOUT_IN_SECS = 15;
    12. public static $successFullHttpCodes = array(200, 201, 204);
    14. public function call($url, $urlParams = array(), $postParams = null, $method = self::METHOD_GET, $headers = array()) {
    15. $finalUrl = $url . $this->getUrlParameterString($urlParams);
    16. $data = $this->makeCurlCall($finalUrl, $postParams, $method, $headers);
    17. return $data;
    18. }
    20. /**
    21. * Creates a curl call for the given url, automatically validates the return value for errors.
    22. * If an error has been found a new Exception will be thrown.
    23. *
    24. * @param string $url
    25. * @param array $postParams Parameters for Post and Put-Requests
    26. * @param string $method HTTP-Method (GET, PUT, POST, DELETE)
    27. * @param string $headers HTTP-Headers
    28. * @throws Exception
    29. */
    30. private function makeCurlCall($url, $postParams = array(), $method = self::METHOD_GET, $headers = array()) {
    31. $curl = curl_init();
    32. curl_setopt($curl, CURLOPT_SSL_VERIFYPEER, 0);
    33. curl_setopt($curl, CURLOPT_SSL_VERIFYHOST, 2);
    34. curl_setopt($curl, CURLOPT_USERAGENT, "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)");
    35. curl_setopt($curl, CURLOPT_RETURNTRANSFER, 1);
    36. curl_setopt($curl, CURLOPT_URL, $url);
    37. curl_setopt($curl, CURLOPT_VERBOSE, 0);
    38. curl_setopt($curl, CURLOPT_TIMEOUT, self::CURL_TIMEOUT_IN_SECS);
    39. curl_setopt($curl, CURLOPT_CUSTOMREQUEST, $method);
    41. if ($headers) {
    42. $usableHeaders = array();
    43. foreach ($headers as $name => $value) {
    44. $usableHeaders[] = sprintf('%s: %s', $name, $value);
    45. }
    47. curl_setopt($curl, CURLOPT_HTTPHEADER, $usableHeaders);
    48. }
    50. if ($postParams) {
    51. curl_setopt($curl, CURLOPT_POSTFIELDS, $postParams);
    52. }
    54. $data = curl_exec($curl);
    55. $this->checkForError($curl, $data);
    57. return $data;
    58. }
    60. /**
    61. * Checks for any errors in the api response.
    62. * If an error has been found a new Exception will be thrown.
    63. *
    64. * @param string $data the resulting data
    65. * @throws Exception
    66. */
    67. private function checkForError($curl, $data) {
    68. $curlInfo = curl_getinfo($curl);
    69. if (isset($curlInfo['http_code']) && !in_array($curlInfo['http_code'], self::$successFullHttpCodes)) {
    70. throw new Exception($curlInfo['http_code'] ? $data : 'could not get a response from the service', $curlInfo['http_code'] ? $curlInfo['http_code'] : 500);
    71. }
    72. }
    74. /**
    75. * Builds a valid http query
    76. *
    77. * @param array $urlParams
    78. * @return string
    79. */
    80. private function getUrlParameterString(array $urlParams) {
    81. if (!$urlParams) {
    82. return "";
    83. }
    85. return "?" . http_build_query($urlParams);
    86. }
    88. }
    90. ?>

    Hallo,

    Du kannst diese Klasse einfach in VB.NET mit WebClient ersetzen da ist wesentlich mehr drinnen als in dieser Classe aber dieAltanative währe HTT nach zu bauen. Das cUrl defakto der WebClient in vb.net ist.

    LG, J.Herbrich

Facebook
Telefonspende