Προς το περιεχόμενο

dimman24

Members
  • ΜΗΝΥΜΑΤΑ

    77
  • ΜΕΛΟΣ

  • ΤΕΛ. ΕΠΙΣΚΕΨΗ

  • ΑΞΙΟΛΟΓΗΣΕΙΣ

    0%

ΑΝΤΙΔΡΑΣΕΙΣ

7 Neutral

ΣΧΕΤΙΚΑ ΜΕ dimman24

  • Κατάταξη
    Advanced Member
  • Ημερομηνία γέννησης 08/10/1984

ΠΛΗΡΟΦΟΡΙΕΣ ΠΡΟΦΙΛ

  • Φύλο
    Άνδρας
  • Τοποθεσία
    Chania

ΠΡΟΣΦΑΤΟΙ ΕΠΙΣΚΕΠΤΕΣ ΠΡΟΦΙΛ

466 προβολές προφίλ
  1. PRTG είναι η απάντηση στο πρόβλημά σου.... Εχει free edition που για μια επιχειριση είναι οτι πρέπει....!
  2. dimman24

    Σύνδεση 2 Router

    Κανε και ενα exclude απο τον DHCP την ip απο το δευτερο ή άλλαξε το range του DHCP & εισαι κυριος
  3. Εστω NIC 1 IP: 192.168.1.100 SUB: 255.255.255.0 GATEWAY: 192.168.1.1 NIC 2 IP: 192.168.2.100 SUB: 255.255.255.0 GATEWAY: 192.168.2.1 cmd route add 192.168.1.0 mask 255.0.0.0 192.168.1.1 metric 2 route add 192.168.2.0 mask 255.0.0.0 192.168.2.1 metric 2 Ετσι ρουταρεις και τα 2 δικτυα αναλογα με αυτο που ζητας.
  4. Αρχικα, βαλε σε ολους ενα user tester με password. Γραψε τις ip και τεσταρε εαν βλεπεστε απ'ολα τα μηχανηματα. Δοκιμασε στα μηχανηματα που εχεις προβλημα με το share να κανεις map τον φακελο. Λογικα θα σου ζητησει δικαιωματα οποτε βαζεις του tester. πες μας τι εγινε
  5. Προταση μην λες τι εχεις κανει απλα πες μας τι θελεις να κανεις. Το τελικο προιον ποιο θα ειναι!
  6. dimman24

    Αλλαγη απο MySQL σε SQL 2014

    Ερώτηση στη MySQL μπορεις να εχεις αυτο με id, date σαν primary id onoma date ----------------------------------- 1 nikos 2015-05-06 2 fivos 2015-05-06 1 manos 2015-05-07 2 kakos 2015-05-07 στον SQL 2014 πως γινετε αυτο?
  7. dimman24

    ASPX Περασμα μεταβλητης

    Οπότε κανεις...λοιπον το προβλημα ήταν οτι περνουσαν μεσα και <br / > οποτε και runtime error ηταν φυσικο. Έτσι άλλαξα λιγο κώδικα και προσθεσα αλλο ενα query, περναω τωρα μονο ενα identity key που το βρισκω απο πριν και όλα καλα..... Ευχαριστω
  8. dimman24

    ASPX Περασμα μεταβλητης

    Καλησπερα θα ηθελα να ρωτησω πως μπορω να περασω αυτο με τα "enter" που εχει reader.Item("veryLongText").toString σε αυτο <%=Server.UrlDecode(Request.QueryString("Data")) %> οι δυο reader ερχονται απο sql
  9. dimman24

    MS SQL & VB ταχυτητα

    Λυση: (λίγο μπακάλης αλλά...) Λοιπόν get_used_tb() και παίρνω τον τελευταίο πίνακα που έχω φτιάξει που τα σιγκρινει με το date.now εάν δεν υπάρχει τον φτιάχνει και συνεχίζει. Δε ξέρω εάν το εξήγησα καλά!
  10. dimman24

    MS SQL & VB ταχυτητα

    (Πάρα πολύ νέοΣ και στα δυο) Έχω φτιάξει ένα πρόγραμμα σε vb που πάει και τσεκάρει από έναν φάκελο txt αρχεία και τα περνάει μέσα στην βάση. Παίρνω από τα txt ότι θέλω κείμενο ημερομηνία path και άλλα πολλά, και τα κάνω εισαγωγή με if not exist στην sql. Το κακό είναι ότι έτσι τρέχει όλη την βάση 12k rows και αυξάνει. Βρήκα κάποιους τρόπους στο internet αλλά κανένας καλός. Έχετε καμιά καλή ιδέα για να γίνει το insert πολύ πιο γρήγορο? Υ.Γ. για να γλιτώσω το πέρασμα όλης της βάσης έφτιαξα άλλον έναν πίνακα που αποθηκεύει ημερομηνίες κατά μήνα π.χ. 201505 και φτιάχνει τέτοιους πινακες
  11. Δε ξερω ετσι καθισε....τι να σου πω...java εγω ξερω αλλα δε με βολευει σε αυτα που θελω να κανω...ειμαι μεσα σε domain και ειναι λιγο περπλοκα τα πραγματα...C# δεν εχω διαβασει..........................ΑΚΟΜΑ χαχα
  12. dimman24

    bootabe antivirus

    Kaspersky Ειναι καλο και δοκιμασμενο
  13. Check & BIOS για το ιδιο πραγμα και δοκιμασε να το βγαλεις απο την μπριζα να πατησεις το ΟΝ και μετα να την ξαναβαλεις τσεκαρε παλι την Ημερομ. εαν την εχασε 1ευρω νεα
  14. Εχω εναν φιλο google στο ονομα....αστα αδερφε 2 μερες ψαξιμο....δε ξερω εαν ειναι σωστη λογικη κωδικα αλλα δουλευει και αυτο μου κανει! Εστω και αν κανει export την πιστωτικη μου...χαχα Imports System.Data.SqlClient Imports System.Security Public Class _Default Inherits System.Web.UI.Page Dim mycon As String = "Data Source=THALIUS;Initial Catalog=db;Persist Security Info=True;User ID=sa;Password=****" 'NA APO8HKEYETAI O COUNT SE OLH THN DIARKEIA Public Property count() As Integer Get Dim val As Object = ViewState("count") Return If(val IsNot Nothing, CInt(val), 1) End Get Set(ByVal value As Integer) ViewState("count") = value End Set End Property 'ARXH Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load dateLabel.Text = DateTime.Now.ToString() End Sub Protected Sub Button2_Click(sender As Object, e As EventArgs) Handles nextButton.Click Dim con As New SqlConnection Dim reader As SqlDataReader Try Dim data_length As Integer = 0 con.ConnectionString = mycon Dim cmd As New SqlCommand("select * from pros where id=" & count, con) con.Open() ' ***EKTELESH QUERY ARXH reader = cmd.ExecuteReader() ' *** TELOS If reader.Read() = True Then bathmosBox.Text = reader.Item("77").ToString onomaBox.Text = reader.Item("onoma").ToString eponymoBox.Text = reader.Item("epitheto").ToString onoma_pateraBox.Text = reader.Item("onoma_patera").ToString onoma_mhterasBox.Text = reader.Item("onoma_miteras").ToString mitrowBox.Text = reader.Item("mitrow").ToString til_kin1Box.Text = reader.Item("til_kinito_1") til_kin2Box.Text = reader.Item("til_kinito_2") thl_statheroBox.Text = reader.Item("til_stathero") Else If count > 0 Then MsgBox("ΤΕΛΟΣ") Else count = count + 1 MsgBox("ooo") End If End If count = count + 1 Catch ex As Exception MsgBox("Error while connecting to SQL Server." & ex.Message) Finally 'MsgBox(GetUserName()) con.Close() 'Whether there is error or not. Close the connection. ' End Try ' End Sub Protected Sub saveBut_Click(sender As Object, e As EventArgs) Handles saveBut.Click Dim con As New SqlConnection Dim reader As SqlDataReader count = count - 1 Try Dim dateofuse As Date = DateTime.Now con.ConnectionString = mycon Dim cmd As New SqlCommand("update pros set 77='" & 77.Text & "',onoma='" & onomaBox.Text & "',epitheto='" & eponymoBox.Text & "',onoma_patera='" & onoma_pateraBox.Text & "',onoma_miteras='" & onoma_mhterasBox.Text & "',mitrow='" & mitrowBox.Text & "',til_kinito_1='" & til_kin1Box.Text & "',til_kinito_2='" & til_kin2Box.Text & "',til_stathero='" & thl_statheroBox.Text & "',date_of_use='" & dateofuse & "',user_modified='" & GetUserName() & "' where id=" & count, con) con.Open() ' Execute Query ' reader = cmd.ExecuteReader() count = count + 1 Catch ex As Exception MsgBox("Error while connecting to SQL Server." & ex.Message) Finally 'OTI KAI NA GINEI KLEINEI H SYNDESH ME THN BASH con.Close() End Try End Sub Private Sub reorder_id() Dim con As New SqlConnection Dim reader As SqlDataReader Try Dim data_length As Integer = 0 con.ConnectionString = mycon Dim cmd1 As New SqlCommand("ALTER TABLE pros DROP COLUMN id", con) Dim cmd2 As New SqlCommand("alter table pros add id int identity(1,1)", con) con.Open() ' Execute Query ' reader = cmd1.ExecuteReader() reader = cmd2.ExecuteReader() Catch ex As Exception MsgBox("Error while connecting to SQL Server." & ex.Message) Finally con.Close() 'Whether there is error or not. Close the connection. ' End Try End Sub Protected Sub backBut_Click(sender As Object, e As EventArgs) Handles backBut.Click Dim con As New SqlConnection Dim reader As SqlDataReader Try Dim data_length As Integer = 0 con.ConnectionString = mycon Dim cmd As New SqlCommand("select * from pros where id=" & count, con) con.Open() ' Execute Query ' reader = cmd.ExecuteReader() If reader.Read() = True Then bathmosBox.Text = reader.Item("77").ToString onomaBox.Text = reader.Item("onoma").ToString eponymoBox.Text = reader.Item("epitheto").ToString onoma_pateraBox.Text = reader.Item("onoma_patera").ToString onoma_mhterasBox.Text = reader.Item("onoma_miteras").ToString mitrowBox.Text = reader.Item("mitrow").ToString til_kin1Box.Text = reader.Item("til_kinito_1") til_kin2Box.Text = reader.Item("til_kinito_2") thl_statheroBox.Text = reader.Item("til_stathero") Else If count > 0 Then MsgBox("ΤΕΛΟΣ") Else count = count + 2 MsgBox("ooo") End If End If count = count - 1 Catch ex As Exception MsgBox("Error while connecting to SQL Server." & ex.Message) Finally con.Close() 'Whether there is error or not. Close the connection. ' End Try ' End Sub Function GetUserName() As String Dim nam As String = Principal.WindowsIdentity.GetCurrent().Name Return nam End Function Protected Sub newuserBut_Click(sender As Object, e As EventArgs) Handles newuserBut.Click End Sub End Class Δεν ειναι το τελικο αλλα για 15 μερες διαβασμα vb ειναι καλα πιστευω
  15. Public Property count() As Integer Get Dim val As Object = ViewState("count") Return If(val IsNot Nothing, CInt(val), 1) End Get Set(ByVal value As Integer) ViewState("count") = value End Set End Property Αυτος ειναι ο κωδικας copy-paste (προσθεσα και ενα updatepanel μονος μου) αλλα δεν τον καταλαβαινω
×
×
  • Δημιουργία νέου...

Χρήσιμες πληροφορίες

Με την περιήγησή σας στο insomnia.gr, αποδέχεστε τη χρήση cookies που ενισχύουν σημαντικά την εμπειρία χρήσης.