Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúCita de: DavEmmanuel en 23 Marzo 2015, 20:26 PM¿Es normal esto?
Cita de: DavEmmanuel en 23 Marzo 2015, 20:26 PMLos nombres de los procesos son: igfxsrvc.exe y taskeng.exe
Cita de: Maurice_Lupin en 23 Marzo 2015, 17:42 PMpara que sirve "Public class..." o es que en este caso no es necesario?
Cita de: Maurice_Lupin en 16 Marzo 2015, 21:40 PMLuego te comento a donde llegue.
Imports System.CodeDom.Compiler
Imports System.IO
Imports System.Reflection
Public Class Form1
Private Sub Test() Handles MyBase.Shown
' Create the ResX file.
Dim resX As New ResXManager(Path.Combine(Application.StartupPath, "C:\MyResources.resx"))
With resX
.Create(replace:=True)
.AddResource(Of String)("String Resource", "Hello World!", "String Comment")
End With
' Compile an assembly.dll that contains the ResX file as an embedded resource.
Dim codeProvider As CodeDomProvider = CodeDomProvider.CreateProvider("VB") ' or New VBCodeProvider()
Dim parameters As CompilerParameters = New CompilerParameters()
With parameters
.GenerateExecutable = False
.OutputAssembly = "C:\Assembly.dll"
.EmbeddedResources.Add("C:\MyResources.resx")
End With
Dim results As CompilerResults = codeProvider.CompileAssemblyFromSource(parameters, "Public class ResourceClass : End Class")
' Read the assembly.
Dim assembly As Assembly = assembly.LoadFile("c:\Assembly.dll")
' Extract/read the ResX file from assembly.
Dim embeddedFileName As String = "MyResources.resx"
Dim targetFilePath As String = "C:\NewMyResources.resx"
Using s As Stream = assembly.GetManifestResourceStream(embeddedFileName)
Dim buffer As Byte() = New Byte(CInt(s.Length - 1)) {}
Dim read As Integer = s.Read(buffer, 0, CInt(s.Length))
Using fs As New FileStream(targetFilePath, FileMode.Create)
fs.Write(buffer, 0, buffer.Length)
End Using
End Using
End Sub
End Class
Cita de: 4dr14n31t0r en 20 Marzo 2015, 23:59 PMcomo podria, como dice el titulo de la pregunta, introducir la parte que yo eliga de un documento de texto en una variable de entorno para guardar datos y poder utilizarlos de nuevo la proxima vez sin tener que introducirlos nuevamente
@Echo OFF & SetLocal EnableDelayedExpansion
Set NewLine=^
REM End New Line
Set multiLineStr=Line1!NewLine!Line2
Echo !multiLineStr!
SetX.exe "MyVar" !multiLineStr!
Pause&Exit /B 0
Cita de: 4dr14n31t0r en 20 Marzo 2015, 23:59 PMcomo dirigir la salida de un comando hacia un lugar concreto de un archivo sin que sea necesariamente al final, es decir entre dos renglones determinados o incluso detras de un determinado caracter de uno de los renglones.
Cita de: 4dr14n31t0r en 20 Marzo 2015, 23:59 PMMe he fijado que aunque escribes help para obtener todos los comandos, en realidad no estan todos (como el comando choice). Como puedo saber cuales son todos los comandos que hay realmente sin tener que mirarlo en internet? Donde estan guardados realmente?
Choice.exe /?
Cita de: 4dr14n31t0r en 20 Marzo 2015, 23:59 PMComo puedo saber cuales son todos los comandos que hay realmente sin tener que mirarlo en internet? Donde estan guardados realmente?
Cita de: luis456 en 20 Marzo 2015, 17:14 PM"resultss3' no es un miembro de 'WindowsApplication1.Form1'.
Private Sub Button2_Click_1(ByVal sender As Object, ByVal e As EventArgs) _
Handles Button2.Click
Me.CleanUp()
End Sub
Private Sub CleanUp()
' Tus famosos results y otras variables públicas, cómo se llamen:
Me.Resultss1 = Nothing
Me.Resultss2 = Nothing
Me.Resultss3 = Nothing
Me.VariableInteger = 0
'etc...
' Tus controles:
For Each tb As TextBox In Me.Controls.OfType(Of TextBox)()
tb.Clear()
Next tb
For Each gb As GroupBox In Me.Controls.OfType(Of GroupBox)()
For Each tb As TextBox In gb.Controls
tb.Clear()
Next
Next gb
Me.ListBox1.Items.Clear()
Me.ListBox2.Items.Clear()
Me.ListBox3.Items.Clear()
Me.ListBox7.Items.Clear()
End Sub