none
VBScripts RRS feed

  • Pregunta

  • Tengo un programa de CAD que para poder utilizar como coordenadas de una curva (spline o bezier) desde un archivo *.csv que evitaría tener que introducir las coordenadas por teclado (son más de 100 puntos y es importante la exactitud del perfil) solo admite archivos *.vbs y no encuentro ningun editor ni compilador con el que poder ejecutar un programa que se pueda leer dentro del programa de diseño

    Donde se puede encontrar el VISUAL BASIC SCRIPTS EDITOR?



    domingo, 6 de diciembre de 2009 19:47

Respuestas

  • Sería interesante saber que programas usas y aquel que tenga un poco de curiosidad o que tenga el programa investigue, te lo digo porque actualmente yo utilizo algo similar con archivos de texto o de Excel para el trazo de polígonos, no de perfiles de avión sino de cartografía digital, puede que solo sea ajustarse al formato.

    Saludos ... Morgan 8-)

    jueves, 13 de mayo de 2010 7:05

Todas las respuestas

  • Hola,

    No acabo de entender muy bien lo que necesitas hacer...
    Desde un ficero .csv crear un .vbs?

    Los ficheros .vbs, son ficheros de texto plano, asi que no necesitarías mas que el notepad para escribirlos.

    Pero tienes este editor por ejemplo: http://www.vbsedit.com/

    Un saludo!



    www.secondnug.com
    domingo, 6 de diciembre de 2009 20:01
  • Hola,

    Como dijo Alfredo, los archivos  .vbs los puedes crear con el notepad.

    Te dejo una guía de VB scripting que espero te sirva.

    http://msdn.microsoft.com/en-us/library/sx7b3k7y(VS.85).aspx

    Saludos.

    -
    Esteban Murchio.

    Si éste post te ha ayudado, por favor, márcalo como respuesta para que pueda ayudar a otros.
    lunes, 7 de diciembre de 2009 19:55
  • Muchas gracias por vuestra ayuda. Tanto el editor de VBScripts como el enlace a MSDN Library han sido muy útiles.

    No se trata del soporte en que se pueda escribir archivos .vbs. Se trata de automatizar la entrada de coordenadas de las figuras realizadad por un programa de Diseño Asistido por Ordenador (CAD) por ejemplo el perfil del ala de un avión, en vez de tener que realizarlo por teclado, pues serían más de 100 pares de coordenadas (x,y). El programa de CAD solo lee archivos .vbs y son las coordenadas de cada uno de los puntos, las que se encuentran en un achivo .csv, por lo tanto el programa tiene que tener una rutina que lea dicho archivo y lo traspase al dibujo.

    Saludos,

    Ricardo Benito
    martes, 8 de diciembre de 2009 17:01
  • Hola Ricardo,

    Por lo que he entendido, por un lado tienes un archivo CSV con las coordenadas, y lo que tú necesitas es un script en VBS que lea ese archivo CSV y lo "traspase" al CAD?

    Suponiendo que el formato del archivo CSV sea algo como esto:
    "1,2"
    "3,5"
    etc.

    Necesitarías una especie de interface entre el archivo CSV y el CAD, por ende, la idea es hacer un programa (script) en VBS que simule dicha interfaz.

    Espero tu respuesta para poder continuar ayudándote.

    Saludos.

    -
    Esteban Murchio.

    Si éste post te ha ayudado, por favor, márcalo como respuesta para que pueda ayudar a otros.
    miércoles, 9 de diciembre de 2009 13:53
  • Así es, se trata de en hacer una aplicacion en un editor de VBScripts que está incluido en el programa de CAD que lea las coordenadas de la linea que estan en un archivo .csv
    miércoles, 9 de diciembre de 2009 19:27
  • Ricardo,

    Entonces lo que tu necesitas, entre otras cosas es, principalmente, ayuda para crear este programa dentro del editor de VBS que trae el CAD?

    http://msdn.microsoft.com/en-us/library/sx7b3k7y(VS.85).aspx
    En el caso que necesites un poco de ayuda, te dejo este código que puede servirte como guía:

        Set
    objFSO = CreateObject("Scripting.FileSystemObject")
        Set objFile = objFSO.OpenTextFile("c:\boot.ini", ForReading)
        
        Const ForReading = 1
        
        Dim arrFileLines()
        i
    = 0
        Do Until objFile.AtEndOfStream
            Redim Preserve arrFileLines(i)
            arrFileLines
    (i) = objFile.ReadLine
            i
    = i + 1
        Loop
        objFile
    .Close

        'Then you can iterate it like this

        For Each strLine in arrFileLines
            WScript.Echo strLine
        Next



    Por las dudas que necesites hacer un split, también dejo un ejemplo:
        MyString = "1,2"
        MyArray = Split(MyString, ",", -1, 1)
        VarX = MyArray(0)
        VarY = MyArray(1)


    También aprovecho y dejo dos links más:
        Windows Script 5.6 Documentation
            [http://www.microsoft.com/downloads/details.aspx?FamilyId=01592C48-207D-4BE1-8A76-1C4099D7BBB9&displaylang=en]

        Microsoft Technet - Script Center
            [http://technet.microsoft.com/es-ar/scriptcenter/default(en-us).aspx]

    Saludos.

    -
    Esteban Murchio.

    Si éste post te ha ayudado, por favor, márcalo como respuesta para que pueda ayudar a otros.
    miércoles, 9 de diciembre de 2009 20:31
  • Esteban,

    Lamento no haber entrado antes a esta página y contestado a tu valiósa ayuda.

    El progama de CAD que manejo no dispone en la acualidad de ningún editor. Anteriormente icorporaba un editor VBA, pero lo suprimieron(¿?). Actualmente el único código que se puede leer  desde la aplicación es el VBS pero tengo que usar un editor externo.

    Estoy utilizando VbsEdit y con este lenguaje he podido leer el archivo .csv y almacenar las coordenadas en vectores (arrays) pero no consigo obtener los valores máximos y mínimos de etas coordenadas para saber las dimensiones de la figura que pretendo dibujar, ni que el programa de CAD las léa en este formato, por lo que estoy casi en el punto de partida.

    Un cordial saludo,

    Ricardo Benito

    miércoles, 5 de mayo de 2010 9:24
  • Hola Esteban,

    Dudo que puedan ayudarte demasiado por estos lados, el tema es asi. Por los sitios y foros de Autocad encontraras mas info.

    http://discussion.autodesk.com/forums/thread.jspa?threadID=312184

    Saludos,


    MCTS - MCP - MST - New Technologies Evangelist
    miércoles, 12 de mayo de 2010 20:21
  • Sería interesante saber que programas usas y aquel que tenga un poco de curiosidad o que tenga el programa investigue, te lo digo porque actualmente yo utilizo algo similar con archivos de texto o de Excel para el trazo de polígonos, no de perfiles de avión sino de cartografía digital, puede que solo sea ajustarse al formato.

    Saludos ... Morgan 8-)

    jueves, 13 de mayo de 2010 7:05
  • Hola Morgan,

    El programa que utilizo es TurboCAD Pro y el editor de scipts es vbEdit.

    Atentamente,

    Ricardo Benito

    jueves, 13 de mayo de 2010 9:49
  • No tengo Turbocad pero tratare de conseguirlo para probar, mientras checa este link que trata del tema, espero te sea de utilidad..

    http://throsn.tripod.com/csvimport.html

    de todas formas veré si puedo conseguir o descargar la versión trial mas tarde y probar

    Saludos ... Morgan 8-)

     

     

    jueves, 13 de mayo de 2010 18:48