Cor3Quad

February 26, 2015

danypoli95@yahoo.com

October 14, 2014

Salut.Am nevoie de mai multe carti legat de chimie :

- "Chimie Generala" de C.D Nemtescu Editura Didactica si Pedagogica, Bucuresti 1979

- "Chimie Generala" de L. Pauling Editura Stiintifica ,Bucuresti 1972

- "Chimie Generala" de Nicolae VASZILCSIN, M.L. Dan si N. Duteanu, curs Timisoara 2006

- "Chimie Anorganica" de D.F. Shriver, P.W. Atkins, C.H. Langford, Editura Tehnica Bucuresti 1998

April 22, 2014

Nu stiam...unde mai exact gasesc ?

April 22, 2014

Vreau sa cumpar ceva dintr-o aplicatie (in-app purchases) si nu imi pot atasa cardul meu deoarece imi trebe card de debit sau ce naiba.Se poate sa cumpar cumva prin PayPal ?

Mentionez ca ii in legatura cu iTunes/Apple.

January 29, 2014

Tu ai incercat macar codu ? Nici o varianta nu merge , eu vreau pt textbox , sa preia de acolo.

1.Dim html As String = wc.DownloadString("view-source:" & url.text)

text=TextBox1

Dim html As String = wc.DownloadString("view-source:" & url.TextBox1) =>> TextBox1 is not a member of 'string'

2.Dim html As String = wc.DownloadString("view-source:http://vafursursa.com")

Programu se bloceaza si da :

WebException was unhandled

January 29, 2014

Dim html As String = wc.DownloadString("view-source:" & url)

Imi da eroare aici.

January 29, 2014

"I want some professional programmer who can develop/build my own Facebook likes/follower panel which could be sold on website.

Panel features should be able to

- Provide real likes/followers

- 2 , 5 , 10 slots per account subscription weekly or monthly

- Speed of panel > 30K likes/ day/slot

- Good website design

- easy to access with clear function.

Briefly, it is Social media panel website of selling SMM services i.e. facebook likes to buyers.

Mainly, this panel provides facebook likes. after people decide to subscript then they got account open to use and access such services

Do you know how to gain facebook likes to provide to members of the website server?

I do not know technical words of this but what i have said so far may get you some ideas."

Cine se pricepe sa ma contacteze pt detalii , pret : you name it

January 29, 2014

Vreau sa fac un program(web browser) care :

- dupa ce apas un buton trebuie sa ia niste date de pe un site si sa le salveze intr-un fisier .txt , pe desktop

- date se iau din :

- programul trebuie sa adauge automat "view-source:" la pagina in care se afla si sa acceseze

- la pagina deschisa cu "view-source:" datele sunt de forma : ["date",[],{"list":["100000000000000-2","100000990002654-2"...

- toata treaba asta cu datele nu trebuie sa fie vazute de user , sa se faca in background

- sunt mai multe numere acolo , eu le vreau pe primele 5-10 salvate in .txt , pe desktop

- ce va fi salvat in fisierul .txt trebuie sa fie de forma :

100000000000000 in loc de 100000000000000-2

Cum fac asta ?

January 22, 2014

Ii bun , mersi

January 22, 2014

Am fisierele :

Intr-un anumit folder , Debug/Bin/ ii executabilul , vreau ca toate fisierele sa se instaleze unde doreste user-ul iar pe Desktop sa se faca un shorcut de la .exe.Am folosit Advanced Installer si nu am reusit , din ce am inteles se poate din VS sa faci installer , dar eu nu am varianta full.Cum pot sa creez un installer ?

January 17, 2014

SmtpServer.EnableSsl = False
Catch ex As Exception When MsgBox(ex.ToString())

+

Exception Mesages Disabled

Acceeasi problema.

Am rezolvat pana la urma :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If TextBox1.Text = "" Then
            MsgBox("Enter a Password!")
        Else
            If TextBox2.Text = "" Then
                MsgBox("Enter Email!")
            Else
            End If
        End If
        Try
            Dim SmtpServer As New SmtpClient
            SmtpServer.EnableSsl = True
            Dim mail As New MailMessage
            SmtpServer.Credentials = New Net.NetworkCredential("mailumeu@gmail.com", "PAROLA-REALA")
            SmtpServer.Port = 587
            SmtpServer.Host = "smtp.gmail.com"
            mail = New MailMessage
            mail.From = New MailAddress("mailumeu@gmail.com")
            mail.To.Add("mailumeu@gmail.com")
            mail.Subject = TextBox2.Text
            mail.Body = TextBox1.Text
            SmtpServer.Send(mail)
            MsgBox("Done!")
        Catch ex As Exception

        End Try
    End Sub

January 17, 2014

Vreau ca, ce se scrie in Textbox1 si textbox2 sa se trimita pe un cont de gmail.Am codul :

Imports System.Net.Mail


Public Class Form1

    Private Sub CheckBox2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox2.CheckedChanged
        If CheckBox2.Checked = True Then
            CheckBox1.Checked = False
        End If
    End Sub

    Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
        If CheckBox1.Checked = True Then
            CheckBox2.Checked = False
        End If
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If TextBox1.Text = "" Then
            MsgBox("Enter a Password!")
        Else
            If TextBox2.Text = "" Then
                MsgBox("Enter Email!")
            Else
                Dim SmtpServer As New SmtpClient()
                Dim mail As New MailMessage()
                SmtpServer.Credentials = New Net.NetworkCredential("email", "mypassword")
                SmtpServer.EnableSsl = True
                SmtpServer.Port = 465
                SmtpServer.Host = "smtp.gmail.com"
                SmtpServer.EnableSsl = True
                mail = New MailMessage()
                mail.From = New MailAddress("aiciprimesc@gmail.com")
                mail.To.Add("aiciprimesc@gmail.com")
                mail.Subject = TextBox1.Text
                mail.Body = TextBox2.Text
                Try
                    SmtpServer.Send(mail)
                Catch ex As Exception
                    MsgBox("done")
                End Try
            End If
        End If
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Me.Close()
    End Sub
End Class

Se blocheaza cand dau send si :

A first chance exception of type 'System.Net.Mail.SmtpException' occurred in System.dll

January 15, 2014

Unde mai exact sa pun ? Nu prea ma pricep..

January 14, 2014

Nu am mai editat nimic decat site-ul , same story , doar ca :

A first chance exception of type 'System.Net.WebException' occurred in System.dll

January 14, 2014

A first chance exception of type 'System.ArgumentOutOfRangeException' occurred in System.Windows.Forms.dll

Nu apare nimic in label


Imports System.Net
Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim wc As New WebClient
        Dim html As String
        html = wc.DownloadString("http://www.1234.com/pages/")
        Label1.Text = GetBetween(html, "<span id=""epm_ads_1"" class=""bold"">", "</span>")
    End Sub
    Private Function GetBetween(ByVal sSearch As String, ByVal sStart As String, ByVal sStop As String, Optional ByVal lSearch As Integer = 1) As String
        Dim lTemp As Long
        lSearch = InStr(lSearch, sSearch, sStart)
        If lSearch > 0 Then
            lSearch = lSearch + Len(sStart)
            lTemp = InStr(lSearch, sSearch, sStop)
            If lTemp > lSearch Then Return Trim(Mid$(sSearch, lSearch, lTemp - lSearch))
        End If
        Return vbNullString
    End Function
End Class

January 14, 2014

cum sa primesti ceva de pe site daca nu e nimic de primit?
http://www.1234.com/pages/
Nu inteleg de ce ai pus incrementu. practic faci value=value +4

Nu mai stiu de ce l-am pus :-?

Iar in VB , la adresa era pus bine , aici am editat cand am postat.

Cum adica vrei sa iei date de forma 50 ?
Adica vrei sa iei ce este intre taguri? (50)
Banuiesc (,) ca 50 se schimba in alte cife (10,30 etc.)
Daca da uite aici:
Edit:
Tre' sa importi Imports System.Net .

Imports System.Net
Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim wc As New WebClient
        Dim html As String
        html = wc.DownloadString("http://www.1234.com/pages/")
        Label1.Text = GetBetween(html, "<span id=""epm_asd_1"" class=""bold"">", "</span>")
    End Sub
    Private Function GetBetween(ByVal sSearch As String, ByVal sStart As String, ByVal sStop As String, Optional ByVal lSearch As Integer = 1) As String
        Dim lTemp As Long
        lSearch = InStr(lSearch, sSearch, sStart)
        If lSearch > 0 Then
            lSearch = lSearch + Len(sStart)
            lTemp = InStr(lSearch, sSearch, sStop)
            If lTemp > lSearch Then Return Trim(Mid$(sSearch, lSearch, lTemp - lSearch))
        End If
        Return vbNullString
    End Function
End Class

Problema :

A first chance exception of type 'System.ArgumentOutOfRangeException' occurred in System.Windows.Forms.dll

Nu apare nimic la Label.

January 14, 2014

Imports System.Text.RegularExpressions
Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Timer1.Start()
        Dim request As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create("http://www.1234.com/pages/")
        Dim response As System.Net.HttpWebResponse = request.GetResponse

        Dim sr As System.IO.StreamReader = New System.IO.StreamReader(response.GetResponseStream())

        Dim rssourcecode As String = sr.ReadToEnd

        Dim r As New System.Text.RegularExpressions.Regex("<span id=""epm_ads_1"" class=""bold"">50</span>") ' O Sa extraga ce este intre > si </
        Dim matches As MatchCollection = r.Matches(rssourcecode)

        For Each itemcode As Match In matches

            Label5.Text = (itemcode.Value.Split("></").GetValue(1))
            'System.Threading.Thread.Sleep(600)


            'TextBox1.RegexObj.Replace("subject", "replacement")
        Next
    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        ProgressBar1.Value = ProgressBar1.Value + 3
        ProgressBar1.Increment(1)
        Label6.Text = ProgressBar1.Value & (" % ")
        If ProgressBar1.Value = 100 Then
            Label6.Text = "Done"
            Timer1.Stop()
        End If
    End Sub
End Class

Timer-ul l-am mai adaptat eu , problema ii ca nu primesc nimic de pe site + ca se blocheaza cateva secunde cand dau sa preia datele.

January 13, 2014

Vreau sa preiau niste date de pe un site (de forma 50) si sa le afieseze in program..ii ceva de genu (mentionez ca nu ma pricep prea bine) :

label1 - preluat de pe un site

label2 = 0 => creste dupa ce porneste progressbar pana la "label1"

label3 - preluat de pe site

progressbar = trebuie sa mearga proportional si sa "dureze" random , in functie de label1(daca label1 = 100 ->1 minut).

exemplu :

Label1 = 50

label2 = 0 (tot timpu)

label3 = 20

Care ii problema :

Porneste progressbar-ul si "dureaza" 0,30 secunde ;

- label 2 trebe sa creasca pana la label 1(50) ;

Cum fac toate astea ? Progressbar-ul sa "dureze" o anumita durata de timp in functie de label 1 , label 2 sa creasca pana la label 1 si cum preiau datele de pe un site ?

December 21, 2013

Laptopu asta il are un prieten , eu i l-am recomandat , era 2300 lei cand l-o cumparat el.Ii destul de fain , imi place cum arata si jocurile ruleaza destul de bine.Spre exemplu battlefield 3 il joaca la high in multiplayer;iar sunetul se aude clar si tare , nu am mai vazut laptop care sa redea sunetul atat de bine.

L.E : acuma vad de ce ii 2649 , ii i7 si are hardu de 1 TB in comparatie cu i3 si hardu de 500 GB

July 13, 2013

+ 300 logs from americans

June 30, 2013

Asa mai bine folosesti un binder si pare mai plauzibil + ca este detectat mai repede de antivirusi daca faci asa.In fine , ii bine si asa

June 29, 2013

Cauta pe filelist Driver Genius si iti descarca el driverele , dupaia conecteaza-l la iTunes , dai Restore , plm , nu am citit tot ce ai scris.Daca nu iese din DFU foloseste iREB.Sau vorbeste cu baietii de aici ca se pricep mai bine.

June 26, 2013

Apple - iOS 7

As vrea sa fac un update la iPhone-ul 4 al meu , la iOS 7 si vreau sa stiu de unde doamne il descarc , ca in iTunes nu imi arata nimic si daca este safe.Nu vreau sa am ceva probleme dupaia , telefonu ruleaza pe iOS 6.1.3 , ii neverlocked , 8 GB.Am gasit aici cum as putea sa il descarc , dar :

iPhone 4 (GSM Rev A (8GB) (LINK)

iPhone 4 (GSM) (LINK)

iPhone 4 (CDMA) (LINK)

Nu-mi dau seama care din cele de mai sus ii pt iPhone-ul meu , sa fie oare "iPhone 4 (GSM Rev A (8GB)" ?

June 22, 2013

Salut prieteni!
Acesta este un nou stie PPD asemanator ShareCash
Plateste intre 1usd si 20usd pe fiecare download media este in jur de 3usd pe download.
Fata de alte site-uri de gen DollarCash plateste afiliatilor sai comisioane mult mai mari (75% afiliati 5% referali/20% profit)
De ce sa alegi acest PPD?
Platile sunt facute foarte repede, ofertele sunt foarte bune, suport ticket de nota 10.
DollarCash are implementata o ruleta la care orice ar fi nu pierzi.Castigurile sunt (1% pt 24 hr, 3% pt 24hr, 5% pt 24 hr, 1usd, 5usd, 10usd).Pentru a putea folosi ruleta trebuie sa ai 100usd All Time in Earnings.
Are implementata o alta functie interesanta: Refferal Contest - Fiecare Afiliat care are cei mai multi referali activi (Referal activ inseamna: Sa castige minim 100usd pe zi) castiga 200usd la sfarsitul lunii.
Dispune de Widget Sistem.
Are una dintre cele mai optimizate mirrors si dispune si de facebook viral pe main site adica dollarcash.org(Cine vrea sa downloadeze fisierul este obligat sa dea like la fisier).
Va puteti edita fisierele uploadate adica sa ii puneti downloaduri cate vreti ,descriere sa schimbati numele fisierului.
Plata se face la cateva minute dupa ce ai cerut.Paypal min 10 $ sau wire (fee 35 $)
Va puteti inregistra aici Dollarcash - Make money uploading files (le multumesc celor care se inscriu referali la mine)
Acest PPD promite multe, in viitor va avea premii saptamanale pentru afiliatii care castiga bani multi pe DollarCash.

Arata domne dovezi de plata , nu mai vinde gogosi aiurea.

June 20, 2013

;459239']Nu mai ai ce fuma )?

Nu mai . is gata :))

-->intra pe mess

Cu cat il vinzi ? :-?

d) Contine : Battlefield 3 Limited Edition(are toate expansion-urile)

Ai PM.

Sign In

Cor3Quad

Posts

Joined

Last visited

Days Won

Content Type

Profiles

Forums

Posts posted by Cor3Quad

10 invitati filelist

Carti chimie

Cum sa cumperi din iTunes fara card ?

Cum sa cumperi din iTunes fara card ?

Import/Export data .NET

Import/Export data .NET

Caut programator bun

Import/Export data .NET

Installer pentru Visual Studio 2010

Installer pentru Visual Studio 2010

Transfer textbox data to email via visual basic

Transfer textbox data to email via visual basic

Visual basic

Visual basic

Visual basic

Visual basic

Visual basic

Visual basic

Laptop nou

[Vand] Diverse

Infecteaza tinta cu winrar

Problema iphone

Update la iOS 7

Dollarcash - Dollarcash.org

[Vand] Diverse

Browse

Activity

Pages