|
Hi to all.
Please help me. I have to connect an autorefractor machine with my medical software so that the readings directly comes into my software and get stored in my database. i donot know where to start can anybody give me a hint. my platform is visual basic 6. and mysql .
any help will be highly appreciated.
thanks
Monica
|
|
|
|
|
I may be able to give you a hand.
Normally, the data is aquired thru the PC's serial port to the autorefractor own PC software.
You'll need to specify the brand and model of the autorefractor and if or what software you have for it, And I'll see what I can dig up about it.
progload
|
|
|
|
|
Thanks very much for replying me. I want to know that the interface will be provided by the brand or i have to code it. should i ask about it to some of the vendors . will they know anything about it.
|
|
|
|
|
I would amagine that if they are good vendors, not just salesmen, that they would know.
Otherwise, I would get the Information on the specific model right from the manafacturer.
decoding serial data is not hard if you know the format of the data.
but if they provide the software interface you may just need to import it into your software.
progload
|
|
|
|
|
|
Have you tried the Manufacturer?, by the way what brand and model is it, maybe I can help find it...
progload
|
|
|
|
|
These are the brands Humphrey,goldman,Zeiss, .Thanks a lot for helping me so much. i think i can atleast see the way to go as i was totaly in dark before this.
thanks
|
|
|
|
|
aparently Zeiss and Humphrey are the same company
here is a link to the software for them:
http://168.143.167.66/humphrey/HFA12_5Letter.html
I'll search around and see what else I can find
|
|
|
|
|
woop's the other link may be wrong, it's for the field one... here is the link to the autorefractor you must register apparently..
http://168.143.167.66/
|
|
|
|
|
Looks like goldman only makes the lenses,
I would download their software and check it out, see how it stores the data and go from there.
Let me know if you need some more help.
progload
|
|
|
|
|
Thanks for the great help.i will look at it
|
|
|
|
|
Hi,
not sure if the subject is really clear but anyway, what I am trying to do is to create a generic data adapter for the different datasets I am using, I don't like all the code .net crestes to add the parameters to the data adapter. In order to do this I read the necessary columns from the tables in the datasets as I or .net defined them on design time. In my procedures I change the columns of my datatables, so in order to creaste the update command parameters I need to get back to the original dataset. As I don't know how to get the original settings out of the current dataset I decided to Dim a new dataset, just for the sstructure, which is the same Type as the current dataset. This works OK if I know at design time what kind of dataset I need to expect, but then durign development you need to go back and update some kind of Select case statement every time you add a new dataset to your project. I have been trying with Ctype and gettype statements but I do not succeed. Guess it is straight forward and I am just missing at least one thing.
Any suggestions?
Public Sub dsAction(ByVal dsOrig As DataSet)
' Dim Audit1 As clAudit
Dim strSQL As String
Dim tb As DataTable
Dim cl As DataColumn
Dim intCount As Integer
Dim strSQLUpd As String
Dim strSQLUpdWhere As String
Dim strSQLIns As String
Dim strSQLInsVal As String
'Dim strSQLDel As String
Dim Newdataset As New dataset
Dim ts As Type
'Audit1 = New clAudit
!! THIS line does not work
dataset = CType(Newdataset,gettype(dsorig.gettype.fullname))
Try
'Open the connection.
'Me.OleGenCon.Open()
For Each tb In Newdataset.Tables
Dim OleDaA As OleDb.OleDbDataAdapter = New OleDb.OleDbDataAdapter
Dim OleDUpdA As OleDb.OleDbCommand = New OleDb.OleDbCommand
Dim OleDInsA As OleDb.OleDbCommand = New OleDb.OleDbCommand
strSQLIns = "INSERT INTO " & tb.TableName & "("
strSQLUpd = "UPDATE " & tb.TableName & " SET "
'strSQLDel = "DELETE FROM " & tb.TableName & " WHERE (GEN_ID = ?)"
For Each cl In tb.Columns
OleDaA.TableMappings(0).ColumnMappings.Add(cl.ColumnName, cl.ColumnName)
If Not cl.ColumnName = "TABLE_ID" Then
If intCount > 0 Then
strSQLIns = strSQLIns & ", "
strSQLUpd = strSQLUpd & ", "
End If
Think, try, think, think, try, think, think, think, try, ASK, think, try, advance on step and start over...
|
|
|
|
|
|
http://atomnet.sourceforge.net/example.html#proxy
|
|
|
|
|
|
hiii
i tried to install SQL Server 2000 on my Windows 2000 Advanced Server and i got error when the setup was configuring the server... it told to check the sqlstp.log file which has the following lines at the end...
i could not get the error...
can anyone help me ???
thnkx
*************************************************************
00:20:03 End Action: Locked Connectivity Files Check
00:20:03 Setup is installing Microsoft Data Access Components (MDAC) ...
00:20:03 G:\x86\Other\sqlredis.exe /q:a /C:"setupre.exe WARN=1 -s -SMS"
00:20:35 ExitCode: 0
00:20:35 Setup is installing Microsoft Distributed Transaction Coordinator (MSDTC) ...
00:20:35 D:\WINNT\TEMP\SqlSetup\Bin\cldtcstp.exe -SupportDir "D:\WINNT\TEMP\SqlSetup\Bin" -DTCPkg "G:\x86\Other\dtcsetup.exe" -LogFile "D:\WINNT\sqlstp.log"
00:20:35 Process Exit Code: (0)
00:20:35 InstallMSSearch instance: MSSQLSERVER
00:20:35 Software\Microsoft\Search\Install:Version not present
00:20:35 MSSearch 2.0 or greater version check returned -1
00:20:35 Setup is installing the Microsoft Full-Text Search Engine ...
00:20:35 "G:\x86\FullText\MSSearch\Search\SearchStp.exe" /s /a:SQLServer
00:20:44 Process Exit Code: (0)
00:20:44 /Q:A /T :\WINNT\TEMP\ixp001.tmp
00:20:44 Setup is installing HTML Help ...
00:20:45 HTML Help installer exit code: 0
00:21:07 End Action InstallPkgs
00:21:07 Begin Action MoveFileData:
00:21:07 Enabled SELFREGISTERBATCH
00:21:07 Enabled CORECOMPONENTHANDLING
00:22:07 Begin Action: MoveFileDataSpecial
00:22:07 End Action: MoveFileDataSpecial
00:22:07 End Action MoveFileData
00:22:07 Begin Action ProcessAfterDataMove:
00:22:07 G:\x86\Binn\hhcol.exe D:\Program Files\Microsoft SQL Server\80\Tools\Books
00:22:08 End Action ProcessAfterDataMove
00:22:08 Begin Action BuildServer:
00:22:08 D:\WINNT\TEMP\SqlSetup\Bin\scm.exe -Silent 1 -Action 5 -ExePath "D:\Program Files\Microsoft SQL Server\MSSQL\binn\sqlservr.exe" -Service "MSSQLSERVER"
00:22:08 Process Exit Code: (0)
00:22:08 Begin Action: CreateRegistrySetSQL
00:22:08 End Action: CreateRegistrySetSQL
00:22:08 Begin Action: RegWriteSetupEntry
00:22:08 End Action: RegWriteSetupEntry
00:22:09 Begin Action: CreateSer
00:22:09 End Action: CreateSer
00:22:09 Begin Action: SkuIt
00:22:09 End Action: SkuIt
00:22:09 SetFileSecuritySQLAndAdmin for D:\Program Files\Microsoft SQL Server\MSSQL returned: 1350, 1350
00:22:09 SetRegSecuritySQLAndAdmin for Software\Microsoft\MSSQLServer\MSSQLServer returned: 0, 0
00:22:09 Begin Action: UpdateSystemPath
00:22:09 Path successfully updated.
00:22:09 %SystemRoot%\system32;%SystemRoot%;%SystemRoot%\System32\Wbem;D:\Program Files\Microsoft SQL Server\80\Tools\BINN
00:22:09 End Action: UpdateSystemPath
00:22:09 Grant Right for V2RS\Administrator returned : 1, 0
00:22:09 Grant Right for V2RS\Administrator returned : 1, 0
00:22:09 Grant Right for V2RS\Administrator returned : 1, 0
00:22:09 Grant Right for V2RS\Administrator returned : 1, 0
00:22:10 D:\Program Files\Microsoft SQL Server\80\Tools\Binn\cnfgsvr.exe -F "D:\WINNT\sqlstp.log" -I MSSQLSERVER -V 1 -M 0 -Q "SQL_Latin1_General_CP1_CI_AS" -H 524698 -U sa -P
###############################################################################
Starting Service ...
SQL_Latin1_General_CP1_CI_AS
-m -Q -T4022 -T3659
Connecting to Server ...
driver={sql server};server=VISHUCOOL;UID=sa;PWD=;database=master
[Microsoft][ODBC SQL Server Driver][Named Pipes]Connection broken.
[Microsoft][ODBC SQL Server Driver][Named Pipes]ConnectionRead (GetOverLappedResult()).
driver={sql server};server=VISHUCOOL;UID=sa;PWD=;database=master
[Microsoft][ODBC SQL Server Driver][Named Pipes]Connection broken.
[Microsoft][ODBC SQL Server Driver][Named Pipes]ConnectionRead (ReadFile()).
driver={sql server};server=VISHUCOOL;UID=sa;PWD=;database=master
[Microsoft][ODBC SQL Server Driver][Named Pipes]Connection broken.
[Microsoft][ODBC SQL Server Driver][Named Pipes]ConnectionRead (ReadFile()).
SQL Server configuration failed.
|
|
|
|
|
This is the Wrong forum to post this in.
Maybe you should try here:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/trblsql/tr_rptconsetup_2awg.asp
|
|
|
|
|
Your question has nothing to do with VB.NET. You might want to try posting this in the SQL Forum[^].
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Dear Friend,
I have problem in my ritchtext box syntax.
when i reach to the syntax
RichTextBox.SelPrint Printer.hDC
it says object required. Error no 424
your quick response will be appriciated
Thanks
Murtuza Patel.
|
|
|
|
|
It would seem that your Printer object has been defined, but not instantiated. Are you missing a "New" somewhere? We can't tell you anything definitive because you didn't post any code defining and setting up the objects in question.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Hi
There are 4 threads each of which downloads data from the internet and displays it in a datagrid.
Thread.start() starts each of these threads.
The problem is they all start off at the same time, filling the same grid without waiting for the previous thread to finish its task.
The result is that the search results fetched by the last thread only get displayed.
A solution is to use Thread.Join() method which forces a succeeding thread to wait for the preceding one to finish its task.
But the Join method locks the GUI and hence we cant click on Cancel or Stop button(similar to that of Internet explorer) to stop the thread and the corresponding download.
If thread.join(1000) which makes the succeedig thread wait for 1000 mili seconds, is used, then few or no results are displayed since the time to finish the task may exceed this time limit.
Need a solution asap.
Would be gr8 if some1 cud help.
Genius123
|
|
|
|
|
Probably Im not taking your point but if you want that each thread waits for the previous one to be finished before doing anything you could just make all 4 tasks in one thread one after the other...
|
|
|
|
|
If each thread is waiting for the previous one, what's the point of having all these threads? Your app is now executing asyc anyway...
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
The problem was with Thread.Join method which locks the GUI.
So you cant click on any other control that tries to stop the thread execution.
But I got the soln. The soln lies in using a mutex object which makes the succeeding thread wait for the preceding thread without locking the GUI.So simultaneously, other controls on the UI can be clicked.
The basic idea is downloading data from the internet using threads and yet being able to use the stop button to stop the search.
|
|
|
|
|
i'm writing this code to be used on a PDA, what i want is to just create a Word document, write some things in and close it. But when i try opening it, an error appears saying that the file cant be opened.
Dim fs As New FileStream("newfile.doc", FileMode.Create, FileAccess.Write, FileShare.None)
Dim sm As New StreamWriter(fs)
Dim i As Integer
Dim j As Integer
sm.WriteLine("test")
sm.Close()
what did i do wrong?
|
|
|
|