Mensajes

Si, muchas gracias me funciono 

Pues quiero editar el mod para no tener que emular mi foro y bueno no se cual de estas cosas tengo que cambiar.

Aquí tienes un simple código de un Autoclick

Código [Seleccionar] Expandir

Public Class Form1
    Private Declare Sub mouse_event Lib "user32" (ByVal dwflags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cbuttons As Long, ByVal dwExtraInfo As Long)
    Private Const mouseclickup = 4
    Private Const mouseclickdown = 2
    Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vkey As Long) As Integer

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Windows.Forms.Cursor.Position = New Point(Windows.Forms.Cursor.Position.X, Windows.Forms.Cursor.Position.Y)
        Timer1.Interval = NumericUpDown1.Value
        Label1.Text = Windows.Forms.Cursor.Position.X
        Label2.Text = Windows.Forms.Cursor.Position.Y

        Windows.Forms.Cursor.Position = New Point(TextBox1.Text, TextBox2.Text)

        mouse_event(mouseclickdown, 3, 7, 1, 2)
        mouse_event(mouseclickup, 2, 5, 9, 3)
        mouse_event(mouseclickdown, 3, 7, 1, 2)
        mouse_event(mouseclickup, 2, 5, 9, 3)

        Windows.Forms.Cursor.Position = New Point(Label1.Text, Label2.Text)
    End Sub

    Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
        Dim hotkey As Boolean
        hotkey = GetAsyncKeyState(Keys.F1)
        If hotkey = True Then Timer1.Start()
        Dim hotkey1 As Boolean
        hotkey1 = GetAsyncKeyState(Keys.F2)
        If hotkey1 = True Then Timer1.Stop()
    End Sub

    Private Sub Timer3_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer3.Tick
        Dim Posicion As Boolean
        Posicion = GetAsyncKeyState(Keys.F3)
        If Posicion = True Then
            TextBox1.Text = MousePosition.X : TextBox2.Text = MousePosition.Y
        End If
        If Posicion = False Then
        End If
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

    End Sub
End Class

Algún código de sistema de noticias en ajax :| los que encuentro hay que pagarlo

Claro, un foro sin contenido bueno no es un foro 

Electrohacker te voy a poner metallica xdd

Gracias por los comentarios...Que musica me recomendarian

Me gusta, intuitivo, ordenado y formal. Estos diseños siempre me gustaron, yo digo que asi se ve muy bien.
De todas maneras de que vale si el diseño es genial y el contenido es ****? Solo digo xD que no importa a tal grado el diseño si se toma en cuestión el contenido, fijate en eso. Saludos y suerte

Foro con gran contenido + buen diseño creo que es triunfo o tiene mas posibilidades

me alegra ver q a pesar de ser "menor de edad" decidiste seguir mi consejo, definitivamente ese host gratuito no da para crear un foro.

Y porq no lo empiezas de cero nuevamente????

en fin... para migrar smf (espero no equivocarme q es lo que quieres), haz un backup, y lo subes por el ftp al nuevo host, usa phpmyadmin, adminer, navicat...(para gustos hay colores) esto para la database, y bueno ya solo falta repair_settings.php

Pero insisto instala todo de cero nuevamente, bueno ya es cosa tuya.

Salu2 y muchos exitos con tu proyecto

Ya está todo hecho de nuevo llevo unas 4 horas o así y el dominio en 24 horas estará

Este último podría funcionar, yo tenía una web así pero tirando a un marroncete bastante claro que destacaba mucho, no la subí pero estéticamente quedaba bien y no era pesada para la vista.

Bueno ya compre el dominio el foro está subido solamente me quedan repasar unas cosillas me dijieron que tarda 24H en que las DNS esten bien

Compré un dominio .com y tengo un hosting gratuito eshost.es quiero que al meterte en mi dominio .com coja los archivos del hosting gratuito el dominio lo compre en dondominio.com